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GESSBS-4 $316* 

1 MHz 6809 CPU 

Sockete lor up to 32 Kbytes EPROM 

Socket* lor up to 16 Kbytes CMOS RAM 

One RS 232 serisl pott 

40 TTL Bidirectional I/O lines 

4 x 16-blt timers 



GESMPU-14 $636* 

8 MHz 68010 CPU 

Optlonsl 32081 arithmetic unit 

Sockets lor up to 128 Kbytes EPROM 

One RS 232 serisl poit 

4 » 8-blt timers 

Real-time clock/calendar and battery 



GESMPU-4A $316* 

8 MHz 68000 CPU 

Sockets lor up to 128 Kbytes EPROM 

Sockets lor up to 64 Kbytes CMOS RAM 

One RS 232 serlel port 

Three 16-blt timers 



SOFTWARE 

OS-9* , PDOS* , CP/M 68K* . Editor-Assembler, Baslc-Psscal-C compilers, FORTH. 
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USA - CANADA 

100 West Hoover Ave. 
Mesa, AZ 85202 
Tel. (602) 962-5559 
Telex 386575 



INTERNATIONAL 

3,chemln des Aulx 
CH-1226 Geneva 
Tel. (022) 713400 
Telex 429989 



* 100 pom qumtltl» 
tf«S«m*(1i or Moloroli Me. 
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CmX Micro-20 
prices 



IICW 21 (12. 5 KHz) $2565 

IICW 21 IK. (7 IKll 12695 

6 PORT 85232 BOARD SET (S8C-6S1 f 4)8 

PROTOTTPING BOARD (SBC-HH) f 75 

BACK PANEL PLATE (BPP-PC) f 44 

I/O BITS ADAPTER (SBC-BA) t 195 

QUAKTin DISCOUNTS ARE AVAILABLE ON THE 

ABOVE ITERS AS F<M.10VS:4-UESS Sit 

H-24.LESS 101) 25-99.LESS 2ll| 100 UP. LESS 301. 



RC6BB6IRCI2 1 2)5.00 

RC6BB6IRC16 t 395.00 

SBC ACCESSOR! PACKAGE (H2I-AP) 11690.00 

For other configurations and options, contact GRX. 

ROTOROIA (6020 USERS RANUAL $ 16.00 

MOTOROLA (6801 USERS MANUAL f 16.00 



I0OR0ER tt UAIt SENO CHECK OR UMEY ORDER OR USE rOUft VISA OR MASTER 
OiUtCt fhut HOW S MU let P*rtMH |MU| 10 C»ar U S ttdarl *M IS UnM- 
mg t ws* b uflfl* IMO 00 fwngfl vdwi add tit n»ndi«fl > «rer B gndw 
1200 00 Foftfgn voot gw JJO0 00 «* t» iNpotd via E«»or ak Fmgnt COtlKI. 
ud •» w« chaioa no laming Al ordiu mult 6* pupa* iuS kw»s Pimm neta 
Inal n,«g* ct«ck> ha«» DMA uUaq hmi I »m>i tv cottcRon w »i .outs idvtsi 
■king ram*, or ti«n *i»n «bj Mr* *««i(K In On O S Ow Miu ti(M ConaUktn- 
111 Hoob Niikiiul Bank « CMeag*. Jli S USVla Sinn. CnUO*. «. 60W3 . 
7J 1M1J 



GMX S-50 BUS prices 

68020 SYSTEM 6809 SYSTEM 



SAStC « and OS-» •>• HMhmuiM « Ukrewara 5mimi C*» and UOTDROI A. We 
FlEX and umfiEx at* Iradimaiki gl Ik*** Srslami Canigiunu. inc GiMlX, 
GM0ST. EMX. ClASSr CH1SSIS. an UaduWki at Giuil. Inc 



Emx 

1337 WE5T37lri PLACE 
CHICAGO, ILLINOIS 60609 

(312)927-5510 • TWX 910 221-4055 



For the user who appreciates the need for a but 

structured systea using STATIC RAN and potiered 

by a ferro resonant constant voltage transformer, 

BRA transfers, high speed RAM, we have the 

tKlfLEX-VH (6020 development systea. 

The systea CPU provides protection to the systea 

and other users froa crashes caused by defective 

user prograas. 

The systea's Intelligent serial I/O processor 

boards significantly reduce systea overhead by 

handling routine I/O functions. 

The UnlFLEX VR Operating Systea Is t deaand-paged, 

virtual aeaory operating systea written In (8020 

Asseabler code for compactness and efficiency. It 

alloys up to 4 Megabytes of Virtual letory per 

user. All systeas Include IR6 of static RAH, 

one 3-port Intelligent Serial I/O board, 

OKA Controllers, a 5' 60 trad floppy drive. 

PRICES 

|020 UnlFLEX VH with 2SRB HO {10,981. 20 

1020 UnlFLEX VR with 8SH6 HO 112.480.20 

TOU CAN EXPAND THESE 120 STSTERS NITN| 

(ORB STREAKER I 2.400.00 

REMOVABLE PACK DRIVE I 1,200.00 

IRTELIICENT I /OS 

|I4 3 Port Serlal-30 Pin f 498.14 

||3 4 Port Serlal-51 Pin f (18.13 

f 12 Parallel-50 Pin | 538.12 

CABLE SETS FOR I /OS 

| 95 Cable Sets Specify Card f 24.95 

| 51 Cent. I.P. Cable for f 12 1 f 44 t 34.51 

| 53 Cent. Cable Set I 36.53 



The number 39 systeas lncludei|IS CPUwOATi |I9 Classy 
Chassis! 256K Static RANi a | 43 2 port serial 
card I cablesi |68 0RA Control lert all necessary 
cables, power regulators, and filler platesi 

Systea f 39 0S-9 GKX II Dual (0 DS0D...I 2,996.39 

wl9N6 f 4.(98.39 

wT2RB t 6,298.39 

The Software Included la this Systeas 
GRXBUG aonlton FLEXi and 0S-9 GNXII. Tou can 
software select either FLEX or 05-9. Also Includes 
OS-9 Editor, Asseabler, Debugger. BASIC-09, RUNS. 
RRS, DO, and GNX-V0ISK for FlEX, 



Systea | 39 UnlFLEX w25RB f 4,698.39 

wBSRB | 6,298.39 

The UnlFLEX Operating Systea Is Included. 

6B09 STSTERS US1RG THE GIHU III CPU I IRTEIL1GERT 
1/0 PROCESSOR BOARDS 

These Systea Include: GRX6B09 CPU III; one |ll 
] port Intelligent serial 1/0 1 Cables; f 19 
Classy Chassis; 256K Static RAR; |60 DRA 
controller; all necessary cables, power 
regulators, and Filler plates. 

Systea I 19 059 GRX III Bual 00 DS0J...I 4. 498.19 

w25RB t 4.498.79 

wBSRB | 1.998.79 

The | 19 Systea Software Includes: 059 GHX1M; 
0S9 Editor, Asseabler, Debugger, BASIC (9, RUNB, 
RNS. 00, RANdlsk, 0-fLEX; GRXBUG: FLEX. The 
GRX Support RON and the hardware CRC board are 
exclusive features Included In this systea. 

Systea | 89 UnlFLEX III w2SRB | 6.198.39 

wB5RB | 0,298.39 

The UnlFLEX GRX III Operating Systea Is Included. 
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68 MICRO JOURNAL 

CPI 

Computer Publishing Center 

5900 Cassandra Smith Road 

PO Box 849 

Hixson, TN 37343 

Phone (615) 842-4600 - Telex 510 600-6630 

Copyrighted © 1986 by Computer Publishing, Inc. 

68 Micro Journal is published 12 times a year by Computer 
Publishing, lac. Secood Class Postage paid ISSN 0194-5025 
at Hixson, TN and additional entries. Postmaster: send form 
3597 to 68 Micro Journal. POB 849, Hiijon. TN 37543. 

Subscription Rates 

1 Year $24.50 USA, Canada & Mexico $34.00 a year. 

Others add $12.00 a year surface, airmail add $48.00 a 

year, USA funds! 2 Yean $42J0, 3 Years $6450 

plus additional postage, for each additional year. 

Items or Articles for Publication 

Articles submitted foi publication must include authors name, 
address, telephone number and dale, as well as a statement 
that the material is original and the property of the 
submitting author. Articles submitted should be on diskette, 
Macintosh, OS-9 or FLEX formal. All printed items should be 
dark type and satisfactory for photo reproduction. No blue 
ink! No hand written articles - please. 

Please do not format with spaces any text indents . chart 
items, etc. (source listings oX) WE wilt edit in ALL 
formatting. Text should be flush left column and use ONLY a 
carriage return to separate paragraphs or other article text 
items! Mac Write, FLEX TSC, Stylo formatting acceptable. 

Letters & Advertising Copy 

Lena* to the Editor should be original copy, signed! Letters 
of gripe as well as prauK are acceptable. We reserve the right 
to reject any later to the editor or advertising copy material, 
for any reaam we deem advisable. 

Advertising Rater. Commercial please contact 68 Micro 
Journal advertising department. Classified ads must be non- 
commercial. Minimum of $15.50 for first IS words. Add 
$.60 per word after the first 15. All classifieds must be pre- 
paid. No classifieds accepted by telephone. 
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The VME BUS and OS-9: 



Ultimate Software 
for the Ultimate Bus 



Modularity. Flexibility. High Perlormance. Future growth. These are probably the prime reasons 
you chose the VME bus. Why not use the same criteria when selecting your system software? That's 
why you should take a look at Microware's OS-9/68000 Operating System— it's the perfect match lor the 
VME bus. 

When you're working with VME you must have access to every part ot the system Unlike other 
operating systems that literally scream KEEP OUT!. OS-9's open architecture invites you to create, adapt, 
customize and expand Thanks to its unique modular design. OS-9 naturally Ms virtually any system, 
from simple ROM-based controllers up to large multiuser systems 

And that's just the beginning of the stoiy. OS-9 gives you a complete UNIX-application compatible 
environment It is multitasking, real lime, and extremely fast And il you're still not impressed, 
consider that a complete OS-9 executive and I/O driver package typically Ills in less than 24K ol 
RAM or ROM. 

Software tools abound for OS-9. including outstanding Microware C, Basic. Fortran, and 
Pascal compilers. In addition, cross C compilers and cross assemblers are available 
for VAX systems under Unix or VMS. You can also plug in other advanced options, 
such as the GSS-DRIVERS™ Virtual Device Interface for industry- 
standard graphics support, or the OS-9 Network File Manager for 
high level, hardware-independent networking. 

Designed forthe most demanding OEM requirements, 
OS-9's performance and reliability has been proven m an 
incredible vanety of applications. There's nothing like a track 
record as proof: to date, over 200 OEMs have shipped more 
than 100,000 OS-9-based systems. 

Ask your VME system supplier about OS-9. Or you can 
install and evaluate OS-9 on your own custom system with 
a reasonably priced Microware PortPak™. Contact Micro- 
ware today. We'll send you complete information about OS-9 
and a list of quality manufacturers who offer off-the-shelf 
VME/OS-9 packages 
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Microware Syetema Corporation 

1866 NW 114th Street • Des Moines. Iowa 50322 

Phone 515-224-1929 • Telex 910-520 2535 

Microware Japan, Ltd. 

41-19 Honcho 4-Chome, Funabashi City • Chiba 373. 

Japan • Phone 0473 (28) 4493 • Telex 781-299-3122 



Modular Hardweie Deserves Modular Software 



Si Pertgatan 7 
Bo. 1309 

ST5I 43 UppMU 



Phone D1B13I1595 
Wei I«t» 



Or RudoH KM GmbH 
ftWBhptlMlll 15 
D4M05 SclHaHhvm 
Waal Germany 
Phone |0 67 031 67 41 
M*i *»W?5 



Elton AG 

Zehveg 12 

CH 5405 Saden Daltml 

Swrirtrtend 

Phono (056) 6*3377 

Wei 826275 



.(lid. 
36 38 John Sired 
IMon. e«fo<d»t«'>. LU1 JJE 
UnplM Kingdom 
Phone (05*2) 4234 ?S 
IWu B2S115 



3? Byrvy* Road 
Palm Baach 2108 
NSW Ausliaha 
Phone 02 9IB-4SI7 



■ Son 

97 On. rue de CotomOei 

92*00 Courhevoie 

France 

PHnna 1.766404G 

Tela 615405 



OS-9 Is a trademark ot Microware and Motorola PoriPak Is a trademark ol Mlerotrar* QSS-Orrvors Is a trademark of Graphic 
Software Systems. Inc. IMX and VMS are trademarks ol DEC Unix Is a trademark ot AT&T 



'68' Micro Journal 



December '86 







DATA-COMP proudly presents the first 
Under $5000 "SUPER MICRO". 

The MUSTANG.02Q™ 



MUSTANG-02& 



The MUSTANG020 68020 SBC 
provides a powerful, compact, 32 bit computer 
system featuring the "state of the art" Motorola 
68020 "super" micro-processor. It comes 
standard with 2 megabyte of high-speed SIP 
dynamic RAM, serial and parallel ports, floppy 
disk controller, a SASI hard disk interface for 
intelligent hard disk controller and a battery 
backed-up time-of-day clock. Provisions are 
made for the super powerful Motorola MC6888 1 
floating point math co-processor, for heavy math 
and number crunching applications. An optional 
network interface uses one serial (four (4) 
standard, expandable to 20) as a 125/bit per 
second network channel. Supports as many as 32 
nodes. 

The MUST ANC-020 is ideally suited to a 
wide variety of applications. It provides a cost 
effective alternative to the other MC68020 
systems now available. It is an excellent 
introductory tool to the world of hi-power, hi- 
speed new generation "super nucros". In 
practical applications it has numerous 
applications, rangingfrom scientific to education. 
It is already being used by government agencies, 
labs, universities, business and practically every 
other critical applications center, worldwide, 
where true multi-user, multi-tasking needs exist. 
The MUSTANG-020 is UNIX C level V 
compatible. Where low cost and power is a must, 
the MUSTANG-020 is the answer, as many have 
discovered. Proving that price is not the standard 
for quality! 

As a software development station, a 
general purpose scientific or small to medium 
business computer, or a super efficient real-time 
controller in process control, the MUSTANG- 
020 is the cost effective choice. With the optional 
MC6888 1 floating point math co-processor 

installed, it has the capability of systems costing 
many times over it's total acquisition cost 



DATA-COMP 



With the DATA-COMP "total package", 
consisting of a heavy duty metal cabinet, 
switching power supply with rf/line by-passing, 
5 inch DS/DD 80 track floppy. Xebec hard disk 
controller, 25 megabyte Winchester hard disk, 
four serial RS-232 ports and a UNIX C level V 
compatible multi-tasking, multi-user operating 
system, the price is under $5000, w/12.5 
megahertz system clock (limited time offer). 
Most all popular high level languages are 
available at very reasonable cost. The system is 
expandable to 20 serial ports, at a cost of less 
than $65 per port, in multiples of 8 port 
expansion options. 

The system SBC fully populated, quality 
tested, with 4 serial ports pre-wired and board 
mounted is available for less that $3000. Quantity 
discounts are available for OEM and special 
applications, in quantity. All that is required to 
bring to complete "system" standards is a 
cabinet, power supply, disks and operating 
system. All these are available as separate items 
from DATA-COMP. 
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A special version of the Motorola 020- 
BUG is installed on each board. 020-BUG is a 
ROM based bebugger package with facilities for 
downloading and executing user programs from 
a host system. It includes commands for display 
and modification of memory, breakpoint 
capabilities, a powerful assembler/disassemble 
and numerous system diagnostics. Various 020- 
BUG system routines, such as I/O handlers are 
available for user programs. 

Normal system speed is 3-4.5 MIPS, with 
burst up to 10 MIPS, at 16.6 megahertz. 
Intelligent I/O available for some operating 
systems. 

Hands-on "actual experience sessions", 
before you buy, are available from DATA- 
COMP. Call or write for additional information 
or pricing. 
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MUSTANG-020, MUSTANG-OS Benchmarks 
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FEATURES 

■ U S Mhi (ojnioiul 16 6 Mhi availjlile) MC6«E0 ruin2-Nlwi<k r«tt proeauor 

■ 32-fail wide data and aikuilxiKi, noo- multiplcud 

■ do chip munition cache 

■ object code compatible aoth ill 68XXX family proccaaon 

■ enhanced SMtructxn act ■ math co-proceatof aalerface 

■ 68181 math hi-tprcd Aoabnt point co-proceiwr ( optional) 
direct cifcranri of full 6B020 now Ikn act 

full lupport IEEE P754. drift 100 
transcendental and other tctentific math funclioM 

■ 2Mtj;ihvuofSIPRAM(5l2» J2biiwg«iiiauori) 

■ u r io2i6KhylMofnFROM(64i:i2l>.u) 

■ 4 Aiymhmnoui arrul TOporti uandtrd 
optional Io 20 aerial porli 
uandaid RS 111 interface 
optional network interface 

■ buffered 8 bil narallel pnrl {1/3 MC68I30) 
CentronK i type pinnia 

■ expansion connector for additional VO devkea 
16 bit data ruth 
256 byte addreti space 
2 inlerrupl inputi 
clock and control ligrull 
Molorola VO Channel Module! 

■ lime of day dock/calendar w/Haltery backup 

■ controller for 2, 5 1'4™ floppy duk drivei 
lingle or double lide, linyle or double deniiiy 
IJ in »II track at let la Me {48-96 TP1) 

■ SA.SI interface 

■ proenuTimabk periodic ailerrupt fsnerelor 
mtemait rale trom micro lecttkit lu leconda 
highly a; . urate lime baae {5 PPM) 

■ 3 bu Knae twilch. readable by the CPU 

■ hardware linfla-nep capability 

■ naati directly lo a atandard i l'4" diik drive 

Site HV16i5 7/t 

Theie aj f'* 68020 iruemi are preaenlly wortin^al 

NASA, Atomic E^oerjry Comminion, other Cjovemment 
AfCuciei al well il Univcetitiei, Oujineii, Labi, and 
cnli:al appbcabonl cenlen. Wur Idwidc, where tpeed, math 
crvaxluni and inulli-uaor, tnulti utkoi( UNIX C level V corapatabuity 
and low coat it a rnial' 




For a limited time we will otter a < 
$400 trade-in on your old 68XXX '. 
SBC. Must be working properly , 
and complete with all software, ; 
cables and documentation. Call ; 
for more Information. • 



MUSTANG-020 Syslem enrnponertt prices - Eflsdive July 1. 1986 
Pilcea stabJBcl to change - cal lor lalau quotas, 



MUSTANG 020 (12.50 Mh2) $2750.00 
Csblnel (PC or ss shown) $299.95 

5--80 Hack floppy DSDO $209.95 

Floppy cable $39.95 

OS 9 68K $350.00 

Wktcnasist cable $39.95 

Wlincrwster Drive 25 Mbyte $895.00 

Xetwc 7V0 comroller $395.00 

Shaping USA UPS $20.00 

Total: $5059.80 

DISCOUNT LIMITFD T1MF: Complete Syatem $1061.00 

Complete System $3998.80 




OPTIONS APP; 

UruTVEX 
MC6888 1 f*pm»1h 

1667 Mfu MC6B020 
16.67 Mfu MC66881 



WE WILL NOT BE UNDERSOLD! 

$90 00 
$275.00 This price eubrSd to increase 
$375 00 Addtional MUSTANG systems soon 

$375 00 



.J 



Nois; Currarn OS-9 (Ver. 1.2) does not address Ihe MC68661 - Future 

revisions wll tl the 66881 Is antfcapeled fci the future. II must be ordered 
with Ihe system, wrarn origlnalry ordered. UnlF\£X does •M^xyi both trie 
enhanced code d the 88020 and 68881 now. 

OPTION BOARDS: " OpOorl botrdt- lo be Inslattd In Mustang-020 cab- 
Inats must be ordered nlth f'w eifavwlon aba). The cabkiel Is loo Ughc for 
dlrea pajgon. Or apedty our new PC type cabinet, vriih InftbaJ order 
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PAT Cum m®\ f^'"— • s.e. 

Media 



With 'C' Source 
$229.00 



tf&nnfiii 



A Division of 



\. T» S900Caun»kSiiiidilU. 

r _ Ilium, T« 3TJ43 

¥ T«kr*»m6I5M2-«W> 

1 Tck. 510 6OXm30 

j L -~»~-~---»,m>.. 



PAT FROM S. E. MEDIA -- A FULL FEATURED SCREEN ORIENTED TEXT EDITOR 

with all the best of PIE. For those who swoie by and loved PIE, this is for YOU! All PIE 
features & much more! Too many features to list. And if you don't like ours, change or add 
your own. C source included. Easily configured to your CRT terminal, with special configuration 
section. No sweat! 

68008 - 68000 - 68010 - 68020 OS-9 68K $229.00 



COMBO 



PATfJUST 

Special $249.00 

JUST 

JUST from S. E. MEDIA - - Text formatter written by Ron Anderson; for dot matrix 
printers, provides many unique features. Output formatted to the display. User con- 
figurable for adapting to other printers. Comes set-up for Epson MX80 with Graflex. Up 
to 1 imbedded printer control commands. Compensates for double width printing. 
Includes normal line width, page numbering, margin, indent, paragraph, space, vertical 
skip lines, page length, centering, fill, justification, etc. Use with PAT or any other text 
editor. The ONLY stand alone text processor for the 68XXX OS-9 68K, that we have 
seen. And at a very LOW PRICE! Order from: S.E. MEDIA - see catalog this issue. 

68008 - 68000 - 68010 - 68020 OS-9 68K 
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From Basic Assembler to HLL's 



PIC 



Position Independent Code 

Last time we discussed the writing of position 
independent code in Assembler. I presented a 
couple of programs that were written in PIC, 
which used the technique of placing variables in, 
before, or after the code in the program and then 
using program counter relative addressing to access 
them. Another approach is to put the variables on 
one of the processor stacks (or point one of the 
stack pointers or index registers at them). 

1 have seen the system stack pointer S use 
frequently in subroutines for "local" variables, i.e. 
storage for variables used completely within a 
subroutine and having no use outside of the 
subroutine. The technique is to back the stack 
pointer up by enough locations to provide for the 
local variables, and then before the RTS, to restore 
the stack pointer to be pointing at the return 
address. Listing 1, included here is a subroutine to 
convert a hexadecimal byte into two ascii characters 
that represent its value. That is, for example to 
convert the binary value 00101 1 10 to the two ascii 
characters 2E, which represent its value. 



• SUBROUTINE TO CONVERT A BYTE INTO TWO CHARACTERS THAT 
■ REPRESENT ITS HEXADECIMAL VALUE 

• 

• BYTE PASSED TO SUBROUTINE IN ACCA, TWO CHARACTERS RETURNED 
' IN ACCA AM) ACCB, HIGH ORDER IN ACCA. E.G. S1A PASSED IN 

• ACCA. EXITS MITK ACCA AND ACCB CONTAINING S33 AND SU 

• RESPBCTIVELT, THE ASCII COOES FOR "3" AND "A". 
• 

KMWEJt LEAS -2,S MAKE ROOK FOR 2 CHAR'S 
STA 1,3 SAVE A COP* 
CLRB 

ASRA GET HI ORDER NIBBLE TO LOWER POUR BITS 
ASRA 
ASRA 
ASRA 



NOTES 



HARD 


CMPA «S0A BICCER THAN 9? 




BGE ALFA 




ADDA fSJO ADD ASCII BIAS 




BRA HAKI 


ALFA 


ADDA »S37 FOR A THRU F 


HAKI 


STA B, S 




TSTB LOOP COUNTER 




BNE EXIT 




INC B 




LDA 1,5 




ANDA tSOF MASK OFF HI ORDER NIBBLE 




BRA MAKO 


EXIT 


PULS D 




RTS 


■ CWLO USE PULS D.PC 



The subroutine is intended to show the technique 
of using the system stack for local variables, and I 
make no claim about its being the most efficient 
way to do the job. There are several advantages to 
writing subroutines this way. First of all, the 
subroutine is self contained. You don't need to 
remember to reserve memory for its variables when 
you include it in a program. Second, the variables 
only take up space while the subroutine is 
executing. There is no "permanent" allocation of 
memory for the variable. In a large program with 
numerous subroutines, this can reduce variable 
storage space considerably. Third, and the point of 
this discussion, the code is position independent 
since the variables are accessed relative to the stack 
pointer. Fourth, since the variable is created and 
destroyed all within the subroutine, you can use the 
system stack without having to worry about 
complications arising from the return address being 
on the stack. Note, however, that if you allocate 
variables as shown here and then jump to another 
subroutine, any accesses in that subroutine must 
have 2 added to the offset value to account for the 
return address from that subroutine. 

One fact that we have not mentioned previously 
in this discussion, which might be obvious to 
seasoned programmers and obscure to beginners, 
is that the above method of creating local variables 
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every time a subroutine is called, makes it possible 
for the subroutine to be re-entrant and recursive. 
That is, it may change the value of a variable and 
call itself from within until the value reaches some 
limit (0 for example) then go on to complete all the 
partially executed recursive calls. One could write 
a very simple routine to calculate the FACTORIAL 
function of a number, for example using this soit 
of variable allocation. 

Global Variables on the Stack 
Now we have a nice way to create temporary 
variables on the system stack within a subroutine. 
How would we go about creating so called Global 
variables (variables that are defined outside of 
subroutines and are available to the whole 
program, and for as long as the program is 
running)? The following program fragment shows 
how to create a couple of variables and point the 
User stack at them, and then how to reference them 
within a program. By using meaningful EQU 
statements and a couple of Macros, an assembler 
program can begin to look like a higher level 
language program in terms of defining variables. 

NAM STXVAR 

TO. STUCK VARIABLES DEMO 
OPT PAG, DtP 
PAG 
• 

• DEMOCXRATION OF LOCAL VARIABLES ON STACK 
• 

WUV46 EQU 9CD03 
INDEC EQU 3CD4* 
OUTOEC EQU SCD39 
PSTRNC EQU SCD1E 
POOr EQU XB24 
NOTCH EQU SCD27 
PVTCKB EQU scoia 
• 

BYTE SOU 1 
INT EOU 2 

• MACRO INITIALIZES COUNT, A VARIABLE USED ONLY AT ASSEMBLY TIME 
i 

INZARG MACRO 
COUNT SET 
ENDH 
■ 

■ DEFINE IS USED TO DEFINE VAAJAALfcS ON THE STACK 
a 

DBF IKE MACRO 
(1 SET COUNT DEFINE VARIABLE OFFSET ON STACK 

count srr count**? bump count for next variable 

M 

I 

• FIRST DEFINE VARIABLES TO BE USED IN PROGRAM 
• 

START INZARG 

DEFINE NUMBER, INT 

DEFINE CKAR.BYTE 
■ 

LIAS ~C0UNT,S MAKE ROCK FOR VARIABLES 

TTR S,U TRANSFER POINTER TO USER STACK 

• DEMO STATEMENTS 
LOA I 1 * 

ST A CIIAR.U 

LDO I1234S DECIMAL NUMBER 

STD NUMBER, U 

IDA »MO CR 

JSR PVTCKR 

IDA »S0A If 

JSR FUTCKR 

IDA CHAR, U 

JSR PUTCMfl SHOULD PRINT * TO TERMINAL 

JNP WARMS 

END START 



This program assembles with the TSC 
MacroAssembler and runs. Of course all it does is 
to do a CRLF and print a small "a" on the screen. 
The code does prove that it stored the "a" in the 
variable at CHAR.U and retrieved it successfully 
after using ACCA for several other instructions. In 
a program running under FLEX, you would 
probably leave the stack right where FLEX put it at 
$C080, but in other environments you would likely 
want to LDS #$XXXX in order to put it in a 
known place, since if your program were large and 
had a large number of variables it might back up 
past SCOOO and overwrite any special drivers that 
your system uses just below SCO00. A good place 
to put the stack in any program that you write, is 
just before the current MEMEND value. 

MEMEND EQU SCC2B 

would go in the EQUaies section of your program, 
since that is the location of the FLEX MEMEND 
value. 

LDS MEMEND 

would take care of putting the stack at the top of 
available memory. Then the LEAS -COUNT.S 
backs the stack pointer up to make room for the 
global variables at the top of memory. TFR S,U 
points U at the first global variable, and everything 
is set up. If you have a four byte REAL number 
math package, you could define: 

REALBQU4 

along with the definition of CHAR and INT, and 
you could then define simple variables by name. If 
you are going to have a table or an array of 
CHARS containing 20 elements you could do the 
following: 

DEFINE NAME,CHAR*20 

That statement would reserve 20 bytes in the 
Global variables and the first location would have 
the label NAME. Now if you have a small number 
of variables so that the offset on the U stack is less 
than 128, you could access element N of that array 
as follows: 

LDB*NAME 

ADDBN 

1JDAB.U 

You could index through an airay of characters, 
say, for example a filename that had been put there 
by another routine and terminated by a null 
character ($00) as follows: 
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LEAX WME.U 
aSR PUMP 

JKP HAHHS 

' SUBROUTINE PUMP STRING POINTER IN X 
PtfW U» ,X* 
8E0 EWJLOP 

jsh putchr 
bra ioop 
ooicp rets 



The instruction LEAX N AME.U is what gets X 
pointing at the first character in the array. From 
that point on it is just about the same as any other. 
Note that a null terminated string allows the print 
loop to be more efficient since you need only put 
the single instruction BEQ ENDLOP rather than 
CMPA #$XX first 



Higher Level Languages 

I can't resist the temptation to put in my standard 
pitch for higher level languages here. Look a few 
lines up where I used the instruction LEAX 
NAME.U to get X pointing at the start of a string 
of characters. Suppose I were not thinking clearly 
and I simply used LDX #NAME. Now X would 
contain the value of the offset from the User Stack 
Pointer at which the string starts. If we have a 
small number of variables, that would result in X 
pointing at some low memory address, probably a 
program instruction. LDX NAME would load X 
with the contents of that same low memory 
location. One has to be careful when writing 
assembler code to use the right instruction. 
Distinctions are precise, and one little mistake can 
cause the program to fail in disaster. Point the X 
register at the wrong address and clear 20 bytes, 
for example, and you might wipe out the very 
instruction that is executing currently! 

The point is that what I have described above is 
quite the way that some of the higher level 
language compilers allocate Global and Local 
variables. Most of the newer compilers written for 
the 6809 put all variables on the stack. Many, 
though not all, generate position independent 
code. The compiler takes charge of the 
bookkeeping for you and sees that the stack is 
properly manipulated and the variables allocated. 

Many of the modem compilers generate code that 
runs very nearly as fast as hand coded assembler 
programs. The penalty paid for this overhead of 
the compiler handling details for you, is generally 
that the compiler treats all variables equally. The 
assembler programmer may see that if he keeps a 
count in the B accumulator, he can increment it 
efficiently and quickly. The compiler will treat all 
| the variables as memory locations. INCB will do 



the job in the assembler program but the compiler 
will probably generate code something like: 

LDDCDUNT.U 
ADDD#1 
STDCOUNT.U 

A good compiler would generate such code as 
above for the instruction COUNT := COUNT+1 in 
Pascal or COUNT++ in C. Of course any given 
routine can't use registers for more than a few of 
the variables, so that the imagined gain is greater 
than that actually realized by going to assembler 
code. In most cases, the modern higher level 
language compilers generate assembler source code 
as an intermediate step, and you can look at the 
code at that point and substitute faster assembler 
code in critical areas. Most all programs spend 
most of their time executing a very few lines of 
code in a repeat loop. That is, for example, they 
execute initialization code once, but somewhere in 
the code is a loop that is executed thousands of 
times during a run of the program. 

To cite an example, PAT is written in PL/9. 
When it first started running reasonably reliably, I 
re-coded some of the key subroutines that ran most 
of the time, in assembler. Just about 2% of the 
object code of PAT is coded directly in assembler, 
but I realized a speed increase of about 5 times by 
optimizing those routines. 

In these days of 640K, 1 Megabyte, 2 Megabytes 
of memory coming as standard equipment on 
computers, the old objection that higher level 
languages generate more code, though generally 
true, is largely irrelevant. It used to be true that 
computer hardware was VERY expensive and the 
cost of a clever programmer who could code 
efficiently in assembler and squeeze more program 
in less hardware was justified. Now the software 
is the largest portion of the cost of doing things 
with a computer, and it makes sense to use a little 
more hardware in order to simplify the process of 
writing and debugging programs. 

I am not speaking from a lopsided perspective, I 
don't think. I have been writing software for 
computers for just about ten yeais now. The first 
four or five of those years, there was no compiled 
language that was nearly efficient enough to allow 
its use for the programs I wrote, so all were written 
in assembler. I spent four months writing and 
debugging a fairly complex program that had to do 
some extensive calculations involving vectors. I 
routinely do software of this complexity in a few 
days now. Before you have a chance to say "but", 
let me add that of course I know more about 
software and programming now than I did then. 
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Taking that gain into account, I still feel that 
writing a program in Pascal or C or PL/9 gives me 
a time advantage of a factor of two to four over 
writing the same program in assembler. The 
proponents of FORTH will claim a factor of as 
much as ten in programming perfoimance for 
FORTH over Assembler, and I have no ieason not 
to believe them, though I prefer the more "English 
like" languages for my work. 

I have claimed a reduction in the size of a 
program source listing of about S to 1 when 
switching from Assembler to a higher level 
language. I have at least one reader who insists 
that I am exaggerating, and that in some cases a 
program written in a higher level language will 
have a source listing just as long as the assembler 
source. I don't doubt that to be true in some cases, 
but I can cite a case in which twelve pages of 
number crunching calculations in assembler could 
be reduced to twelve lines of PL/9 program! Of 
course the twelve lines don't include listings of the 
math package and scientific function library in the 
PL/9 program, but the assembler listing doesn't 
include those function routines either. I suppose 
the conclusion ought to be that depending on the 
type of program you are writing, the higher level 
language source listing may be about as long as, or 
a great deal shorter than the assembler source 
listing. For the sort of programs that I write, the 
latter is true. 

The brevity of the listing is not the whole story 
either. In my situation, two programmers are 
presently involved, and we are considering adding 
another programmer to our staff. More 
programmers are only of value if they can 
understand someone else's code. I contend that 
though a very experienced assembler programmer 
can understand someone else's assembler code, it 
usually takes longer to become familiar with 
someone else's assembler code than with someone 
else's code in Pascal or PL/9 (my first choices'for 
"self documentation"), or even "C" which is 
generally a little harder to follow (perhaps because 
I am less familiar with it). FORTH programmers 
claim that they can follow someone else's FORTH 
program quite easily. I can't speak from 
experience on that subject. 

As I have said repeatedly whenever this 
discussion comes up, if software performance 
(execution time) or size is of such great importance 
as to override the cost considerations, then of 
course, assembler code is the only way to go. 

FOR THOSE WHO 

I 



Disk Controller Troubles 

Now that my personal GMX DMA disk 
controller is back to functioning flawlessly, the 
system at work started getting flaky. I had tried the 
old "wiggle the cards" nick a number of times, and 
it seemed to work fine, but the system seemed to 
need the cure more often than usual. The other day 
the system was turned on in the moming and it 
worked fine. Later in the day I went to use it after 
it had been sitting idle for a couple of hours and I 
couldn't read a disk file at all. 

I remembered some trouble I had had a long time 
ago with the SWTPc DMAF controller board. The 
1791 disk controller had become heat sensitive. I 
could tun the system for a while and it would then 
get flaky. I discovered that blowing a fan directly 
on the 1791 would make it work. Later I 
discovered that one of the trim adjustments on the 
board would also make it work after it warmed up. 
Eventually the problem got so bad that I decided to 
try a new 1791, and it worked fine. I suspect that 
one of the ribbon cables got pushed against the 
1791 and it got no air circulation and overheated. 
We are presently waiting for a replacement, and 
running the system with the cover off and the trim 
adjustment set for the best compromise between 
hot and cold operation. I wonder if anyone else 
has had 1791 troubles of a similar nature? 



Ramblings 

This column is a little shorter than usual because 
of my current time pressures. I am involved in the 
completion of a consulting project, and also 
preparing for a vacation nip. My wife and I are 
celebrating our 25th wedding anniversary on 
October 14. We are definitely not world travelers, 
but a couple of years ago we had an exchange 
student from Brazil, and we are going to see him 
and his parents as our anniversary present. We 
leave for Brazil on October 13 and return to the 
U.S. on November 3, so we have been busy 
making preparations. 

I expect I will have a little time to look at 
computers and their use in Brazil and I will report 
what I have found when I return. 

EOF 
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This chapter continues the discussion of the 
proposed ANSI C standard and the discussion of 
common problem areas in the use of the C language. 

The proposed standard specifies that comments 
may not be nested. Nested comments are a 
nonstandard feature of many current compilers. 
They will probably remain a nonstandard feature of 
many future C compilers because of their 
convenience. However, the default action of a 
conforming compiler must be to disallow nested 
comments. 

One of the primary reasons for disallowing 
nested comments is directly associated with one of 
the primary reasons for allowing them. If a trailing 
comment delimiter (*/) is accidentally dropped or not 
coded in input to a compiler which disallows nested 
comments, the compiler can provide better 
diagnostics and error messages on subsequent 
leading (/*) and trailing (*/) comment delimiters than 
in input to a compiler currently allowing nested 
comments. 

The primary reason for allowing nested 
comments is to allow entire sections of a program to 
be readily logically deleted without dropping them 
from the source code entirely. However, this may 
be better performed by surrounding the code to be 
deleted with an "#ifdef xxxxxx" - "#endif ' pair, 
where "xxxxxx" is not defined. The only exception 
to this is when the "#ifdef xxxxxx" - "#endif" pair 
spans disjoint "#ifdef ' - "#endif ' pairs, but even this 
case may be properly handled with a little thought 
and cleverness, and should be rare. 



A preprocessing directive is introduced by an 
unquoted "#" symbol and teiminated by a new-line 
symbol not preceded by a "\" symbol. The "#" may 
be preceded by or followed by tabs or spaces, and 
the terminating new-line symbol may be preceded by 
tabs or spaces. Preprocessing directives containing 
only "#", optional tabs and spaces, and new-line 
symbols, are accepted and ignoied. 

They are called "preprocessing directives" 
because they are assumed to occur in a separate 
compilation stage occurring before the analysis of 
the syntax of the resulting source program. 
Comments are also detected and dropped during this 
pass, but they are not normally referred to as 
preprocessing directives. 

Preprocessing directives of the following foims: 

#define macro body new-line 
#define macro(list) body new-line 

define a macro name which indicates that 
subsequent unquoted occurrences of the macro name 
will be replaced by a processed version of the macro 
body. A macro name may be redefined only by one 
of the same type (parame terized or not) and identical 
body. 

In the first (non-parameterized) case of definition 
of the directive, the body of the macro replaces each 
occurrence of the macro name without modification. 
In the second case, the body of the macro is logically 
modified, with unquoted occurrences of the names 
in the macro parameter list being replaced by the 
corresponding strings in each call, before the 
replacement is performed. Macro parameter list 
names immediately preceded by a "#" symbol in the 
macro body are logically surrounded by 
double-quote symbols during the replacement 
process. Macro parameter names immediately 
preceded by a "##" sequence are concatenated to the 
preceding token. 
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Macro names are replaced outside of quoted 
strings and character constants. The replaced 
sequence is rescanned for additional macro names; 
however, if a macro name itself is discovered during 
this rescanning, it is not replaced, in order to prevent 
macro loops. Since adjacent quoted strings are 
assumed concatenated in the proposed standard, the 
use of macro parameters is further enhanced. 

For example, given the following declaration: 

#def»ne debug(s.t) \ 

printf("x"#s"=%d f x"#t"=%s M f \ 
x##s,x##t); 

the following text: 
debug(l,2); 

would be equivalent to the following text: 
printf("x""l""=%d,x""2""=%s",xl,x2); 

which is equivalent to the following text: 
printf("x 1 =%d,x2=%s",x l,x2); 

The directive may be continued across multiple 
source lines by preceding the intermediate new-lines 
with "\" symbols. 

The definition of a macro name may be removed 
with a preprocessing directive of the following form: 

#undef macro new-line 

for redefinition or for other purposes, such as 
conditional inclusion and exclusion of program text. 

Source lines may be included from other files 
with preprocessing directives of the following 
forms: 

#include "filename" new-line 
#include <filename> new-line 
#include macro-name new-line 

in which the first form searches the current 
directory before searching a common directory, the 
second reverses the process, and the third may 
represent and evaluate to either of the preceding 
forms. Source lines included by this process are 
processed almost identically to source lines included 
in the original source file. Nesting of this process is 
allowed to an implementation-defined limit. 

The definition or nondefinition of a macro name 
may be detected with preprocessing directives of the 
following forms: 

#ifdef macro-name new-line 
#ifndef macro- name new-line 

Source lines are included or excluded until one of 



the following corresponding preprocessor directives 
is encountered: 

#else 

#endif 

and, if the "#else" directive is encountered, the 
inclusion or exclusion of source lines is reversed 
until a corresponding "#endif" directive is 
encountered. These preprocessor structures may be 
nested to some implementation-defined limit 

A similar (but more powerful) preprocessing 
directive which allows the inclusion or exclusion of 
lines of souice code, has the following forms: 

#if constant-expression 
#if defined macro-name 
#if defined(macro-name) 
#if idefined macro-name 
#if !defined(macro name) 

and uses the same interpretations of the "#else" 
and "#endif directives. In addition, the "#elif 
directive is equivalent to an "#else" and an "#iP 
directive. 

This constant-expression may involve any 
previously-defined or self-defined constants and 
arithmetic or logical operators, but may not involve 
the sizeof or cast operations, or enumerated 
constants. Computations are performed in the 
equivalent of data type "long int". 

Actually, "defined" may appear in any 
constant-expression used in an "#if ' directive. It 
evaluates to 1 (true) if macro-name has been defined 
by an "#ifdef" directive and not more recently 
undefined by an "#undef directive. The second and 
third directives above are equivalent to an "#ifdef ' 
directive and the fourth and fifth directives above are 
equivalent to an "#ifndef ' directive. 

Another directive, which is seldom used by 
humans in writing C programs, but is often used by 
programs which write other C programs, has the 
following forms: 

#line line-number 

#line line-number file-name 

The line number of a source line in a C program 
is defined as one more than the number of new-lines 
preceding it in its source file. The "#line" directive 
allows the line number (and, optionally, the file 
name) to be overridden to assist the programmer in 
finding syntax and logic errors. The predefined 
macro names "_LINE_" and "_FILE„" 
represent the line number and source file name of the 
current source file, possibly overridden by "#line" 
directives. 

The proposed standard provides an 
implementation-dependent preprocessor directive of 
the following form: 
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#pragma character-sequence 

The character-sequence is processed in an 
implementation-defined manner. If a given 
conforming implementation does not recognize a 
given "#pragma" character-sequence, it ignores it 
silently. 

C PROBLEM 

Difficulties caused by alignment and data type 
lengths are probably one of the most troublesome 
traits of the C language. Neither the K & R book 
nor the proposed ANSI C standard address either 
type of problem, as both leave alignment and data 
type length considerations to the implementation. 
Such problems normally appear during initial 
program debugging or during maintenance 
modification; however, they may also appear during 
porting to new compilers, operating systems, or 
computers. These problems may be quite subtle, as 
no syntax errors are normally generated by 
alignment or data type length mis-matches. 

Given the following structure declaration: 

struct si 

I 

char cl; 

short int si; 

int 11; 

long 11; 

float fl; 

double ell; 
) stl; 


what are the possible values for "sizeof(stl)"7 
Consider alignment and data type length separately. 
Also consider the effects on both for computers with 
byte lengths of other than eight bits and word 
lengths of other than eight, sixteen, or thirty-two 
bits. Determine the airangement of declarations 
which would provide the minimum value of 
"sizeof(stl)". 

Given the same structure declaration as above, 
consider the effect of moving the following 
declaration: 

char *pl; 

through the structure, starting with placing it 
before the first declaration and ending with placing it 
after the last declaration, assuming the same 
conditions. 

This is not the extent of the complexity of the 
situation. On some combinations of compilers and 
computers, there are multiple pointer lengths for 
on-segment and off-segment references (e.g. near 
and far pointer types in Microsoft C for the IBM PC) 
or for different data types. 

EXAMPLE C PROGRAM 

Following is this month's example C program; it 
is the first part of an internal B+ tree manipulation 
program. It is long but instructive. Rather than 
entering it manually, it may be downloaded from the 
computer bulletin board with telephone number 
404-493-4708. 


/• B+ tree search, insertion and deletion */ 

Ndefine N 2 

Adeline NN 4 /* index page size */ 

Ndefine L 2 

Ndefine LL 4 /• data page size */ 

Ndefine NULL 

Ndefine LEAF 

Ndefine INDEX 1 

typedcf struct page 

( 

int p«ge_type; 

union 

1 

struct 

1 

int m; 

siiuct page *p0; 

struct 

( 

int key; 
struct page *p; 

} 
e[l+NN]; 

} 
indexp; 

siiuct 

I 

int k; 


struct 

{ 

int key; 

int count; 
) 
dtl+LLl; 

) 
teafp; 

) 
type; 

) 

PAGE. »REF; 

rypedef struct item 
i 

int key; 

snvct page *p; 
) 
ITEM: 

typedef struct info 

i 

int key; 

int count; 
) 

INFO; 
REF root; 

main() 


( 

REF q, leaf; 
int x, h; 
ITEMu; 
char *new(); 

scanf("%d ". 4x); 

root = (REF)new(siz«of(*root)); 

root->page_type = INDEX; 

root->type.indexp.m = 1; 

root->type.indexp.pO = leaf = 

(REF)new(siz«of(»leaO); 
leaf->page_type = LEAF; 

leaf-xype.leafp.k = 0; 

root->type.indexp.e[l].key = x; 

root->type.indexp.eIl).p = leaf = 

(REF)new(siz«of(»leaO); 
leaf->page_type = LF.AF; 

leaf->type.leafp.d[l).key = x; 

leaf-xype.leafp.k = 1; 

leaf->type.leafp.df ll. count = 0; 
while (x 1= 0) 

I 

printfC'search key %d\n", x); 
search(x, root, &h, &u); 
if(h) 
( /• insert new base page */ 
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q = root; 

root * (REF)new(sizeofX*root)); 

rool->p»ge_type - INDEX; 

root->type.indexp.m = 1; 

rooi->type.indexp.pO = q; 

rool->iype.indexp.e(l].key = u.key; 

rool->typc.indexp.e(l].p = u.p; 

I 

prinnree<root, I); 

scaniT*"*". Ax); 
) 

tcanJCW, Ax); 
while (x I- 0) 

( 

ptimf( "delete key %d\n", x); 

delete<x. root, Ah); 

if (h> 

[ I* bue ptge size wu reduced */ 

if (rool->lype.indexp.m = 0) 



{ 



q » root; 
root » q->type.indexp.pO; 



pnnitree<n>ot, 1); 
«cani(' *d". Ax); 



char *new(n) 
unsigned int n; 
{ 

char *p. •mallocO; 

if ((p - malloc(n)) = NULL) 
{ /* no space available */ 
prtntf("no space at alTVn"); 
exit(l); 

I 
else 

retum(p); 



I* Search key x on B_tree with root a; if found, increment 
counter, otherwise insert an item with key x and count 1 in 
tree, [f an item emerges to be passed to a lower level, then 
assign it to v, h » "trae a has become higher" */ 
tcuch(x, «, h, v) 
int x; 
REF* 
int »h; 
fTEM »v; 
{ 

int k, 1, r; 

REFq; 

iTEM u; 

INFOz; 

char *new(); 



I* search for key x on page *«; h « false */ 

if (a->page_type — LEAF) 

{ 

1 = 1; 

r » a->type.leafp.k; 
while (r >• I) 
( I* binary array search •/ 

k - (l + r) / 2; 

if (x <» a->type.leafp.d[k].key) 
r-k-l; 

if (x » a->type.leafp.d[k].key) 
l-k+ I; 
); 

if (I -r> 1) 
( I* found ♦/ 

a->type.leafp.d[k).count +» 1; 

*h-0; 

1 
else 

( 

z.key m x; 
z. count » 1; 
insert l(a, r. h, v, Az); 
) 
l 
else 

< 

i= I: 

r » a->type.indexp.m; 
while (r >- I) 

{ I* binary array search */ 
k = (I + r) / 2; 
if (x <* a->type.indexp.e[k).key) 

r-k-l; 
if (x >» a->type.indexp.e[k]key) 
l-k+ 1; 

): 

if (1 - r > 1 ) 

( I* found •/ 

q » a->type.indexp.e[klp; 

search(x, q. h. Au); 

) 

else 

( I* item is not in this page */ 
if (r =« 0) 

q - a->type.indexp.pO; 
else 

q - a->type.indexp.e[r).p; 
search(x. q, h, Au); 
if Ch) 
( I* an item u is being pa&sed up •/ 

inserti(a, r, h. v, Au); 
I 
) 
I 



EOF 
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DOES THIS REGISTER WITH YOU? 

Ever come across a programming problem that just 
doesn't make sense? You look at the code, over and over. 
You've used the same code, or at least something similar 
befoie and it's always worked. This following example 
happened to me. See if you can spot the mistake. I passed 
two parameters from Basic09 to a machine language 
subroutine. The machine language piogiam was to set the 
priority of a process. Registers A and B were to be loaded 
with process ID and priority, respectively. The call from 
Basic09 could pass either integer or byte values. If a byte 
was passed, all that was necessaiy was to load it into a 
register. If an integer ( two byies ) were passed, the second 
half of it would be used. Here is the codes with only the 
essentials. 

CMPD 12 

BNE S001 

LDA [PARl+l.Sl 

BRA 5002 

5001 LDA IPAR1.S] 

5002 EQU * 
LDD SIZE2.S 
CMPD #2 
BNE 5003 

LDA IPAR2+1.S] 
BRA 5003 

5001 LDB [PAR2.S1 

5002 EQU * 
OS5 FSSPRIOR 

The parameters are passed on the slack. SIZE1 and 
SIZE2 indicate whether PARI and PAR2 point to an inieger 
or byte value. When I ran the assembled code, it would 
always return with an error #238--Bad Process ID. Everything 
looked fine, but it would not woik. Do you see the mistake? 

Time's up! I sure the shaip programmers out there 
spotted it right away. The logic is correct, but the registers 
were used incorrectly. Registers A and B are the D register. 
Ttieiefore, the line LDD SIZE2.S wrote over the process ID 
which was in register A. The value could have been saved 
using PSHS A and retrieved later with PULS A. But a better 
solution would be to use another register, In this case, I 
wasn't using the X register, so I used LDX and CMPX. Then 
everything worked out fine. Another benefit was the code 
ended up two bytes smaller. 

Using PSHS and PULS is very useful in saving 
registers. If you find yourself writing assembly language 
subroutines, you may want to save any or all of the registers 
on entry and restore them when leaving the subroutine. The 
overhead is two bytes to PSHS registers and two bytes to 
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restore them. This can save considerable heartache later. 
PSHS and PULS are represented by a byte, each. A post-byte 
is added for the registers. Each bit in the post byte lepresents 
a register. 

Bit NO. 76543210 

Reg. PC S Y X DP B A CC 

The push order is from left to right. The pull oider is 
from right left. Notice the program counter, PC, goes on 
first, but comes off last. This makes it useful for 
subroutines. Let us say you pushed the X and A registers at 
the stan of the routine. As a last step you can use: 
PtJLS A,X,PC 

Pulling PC restores the program counter and returns 
execution to wherever the call originated. As another note, 
the U register can be used as a stack pointer. Use PULU and 
PSHU. Just remember to point it to some data memory area. 

But for OS-9 the U register has a greater importance, as 
do all the other registers. Whenever a process is created, a data 
area is created for it in memory. Registers, U and DP. point 
to the start of data memory. X and S point to the division 
between the data area and parameter area. And Y points to the 
end of the parameter area. Register D contains the size of the 
parameter area. And PC, the program counter, is loaded with 
the entiy point of the module. Mapping this in memory, it 
appears: 



U, DP > 



low mem 



data are 



X, S > 



parameter area 



Y > high mem 

D - parameter area size 
PC - absolute address of entry 
Such a set up can make programming extremely easy. 
Direct page addnssing can be used or indexed addressing can be 
used. For the first 256 bytes, the direct method works well, 
since DP points to the most significant byte. Entering 

LDA <2 

will load register A with the 3rd byte of the data area. The left 
arrow tells the assembler to use direct addressing. The 2 
makes it the 3rd byte with and 1 being the first and second. 
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This line could also be written: 



which will take 3 bytes. The same thing can be dene with: 



LDA 2,U 

using the indexed addressing mode. Both will do the same 
thing. Index addicting lets you go further than the 256 byte 
limit of direct addressing. 

The X register ends up pointing to the parameter list. 
That is rather convenient if you consider that many of the 
OS-9 calls use the x register to point to things like pathlists, 
filenames, and module names. Ixt us say you want to open a 
paih to a file for leading. On entry the X register will point 
to some parameter list. So entering the line: 

READ FILENAME 

will result with the OS-9 SHELL executing the module 
READ and the X register pointing to "FILENAME". The 
code to handle this could simply be: 

Ida #1 
oa9 FSOpen 
bes Error 

After the call, the X register is advanced. So, multiple 
file names could be easily handled. The X register sometimes 
is used to point to buffer areas. The most common ones are 
the read and write calls. 

Now for the slack pointer. The stack is perhaps the most 
important register of them all. I recently wrote a little 
program and forgot to supply a slack area. Wrong! 
Eveiything crashad. The moral is to supply an adequate stack 
area. Remember every procedure has its own stack area. The 
slack builds upward as viewed from my diagram. If you don't 
supply enough area for it. it will build into the data area or 
worse. It may go to places, it shouldn't. 

Besides saving and restoring registers as I pointed out 
earlier, the stack can be used for other things. Let us say you 
need instant memory. Maybe it is subprogram for Basic09. 
You want to create two integers, storing in the first and 3 in 
the second. The following code would handle this. 

leas -4,3 
clra 
clrb 
atd 0,9 
ldd »3 
std 2,3 

The leas -4,$ moves the stack up (towards low mem) by 
4 bytes. Now to that everything must be referenced from the 
stack pointer's new location and when your all done restore the 
stack pointer with a leas 4,s. This technique is used for 'auto' 
variables in C language programs. Another thing, the stack 
pointer can offer throw away memory. Testing the X register 
for can be done with: 

crrpx #$0000 



stx -2,3 

This stars the value of X two bytes ahead of the stack 
pointer, a throw away area. But it sets the appropriate 
condition code registers and it takes only 2 bytes. 

The A and B registers have their own responsibility in 
OS-9. In all the system calls that involve input/output, the A 
register is the path number. Occasionaly it holds other 
information like language/type code for some of the other 
calls, but predominantly it is used for path number. The B 
register is used for a number of things like attributes/revision 
level, function code for GetStt and SetSu, and directory 
attributes. But its most important role is for error codes. If 
the carry bit is set in the condition code register, B will 
contain the eitor code. With only a few exceptions, all the 
calls return their error status in this way. 

I've already mentioned the condition code register CC. 
Its importance to OS-9 is to indicate an error. If the carry bit, 
bit IrO. is set then an error is indicated. If it is cleared, no 
error. In the past, I used to set and reset the bit with calls 
like: 

orcc *%00000001 
andec #%11111110 

Each of these codes grncmie 2 bytes. Now I use; 

coma 
clrb 

The 'coma' complements the contents of register A. This 
in not important, but the cany bit is always set. The 'clib' 
clears the B register and sets the carry bit. Each line generates 
only I byte of code. Another savings! 

I haven't mentioned much about the Y register. It does 
point to ihe end of the parameter area. This may or may not 
be important, depending on what you are doing. I usually try 
to use the X register for indexing where it is possible. The Y 
register operands involve more bytes of code than the X 
register. The Y register code is the same as the X with a $10 
tacked on the front. This means, everytime you use the Y 
register where the X would have worked, you add an extra byte 
of code. I like to think of the Y register as an stand-by 
register. It does get used in some system calls like FSCRC, 
1SREAD and 1SWRITE. Usually it is used for a counter. 

The registers used in OS-9 have a great importance. 
There is so much that 1 haven't covered here. If you aren't 
into assembly language programming, you may feel this isn't 
very important. But even the higher level language use the 
registers extensively. In Basic09, parameter pointers are 
passed on the stack with their size. In C language, the Y 
register is used to point to the data area instead of U. The 
stack is a place where auto variable are creatad. And it is used 
for pass values to the functions. So, even if you work with 
these languages, remember the registers are at the center of 
things. 
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THE KO PUNCH, 1-2-3 POW! 

A few months back I started talking about KB ASIC. 
Kbasic is a basic compiler from Lloyd's I/O. It works in 3 
stages. There is a token filegeneiaior, KS. KA converts the 
token file to assembly language source code. Finally, KO 
creates object code from the source code. KO is the surprise 
of the bunch. It is a sharp assembler that can be used for 
many of your assembly language projects. 

Usually, I use the Microware Interactive Assembler. I 
have no complaints about it. It handles most of my 
programming needs. But KO does a nice job too, with a few 
extras. I won't go into details about it as an assembler, since 
most of you are familiar wiih them. But let me tell you a 
little about its added features. 

Il handles IF ...ENDC a little differently. With MIA you 
could create a line like: 

STATUS SET 
IFEQ 
CLRB 
ELSE 
LDB *1 
ENDC 

Now if STATUS is 0, we clear the contents of register B. 
Change il to another number and B is loaded with a 1 . Wiih 
KO the same thing could be written: 

STATUS SET 
IF STATUS-0 
CLRB 
ELSE 
LDB #1 
ENDC 

Here STATUS is compared to 0. We could have also written 
the second pan as: 

IF STATUS-1 
LDB #1 
ENDC 

A whole tange of possibilities is here, since the assembler 
recognizes the usual operators, like +, =, < and ! (not). 

Another feature is, il recognizes mneumonics that were 
features of the 6800. Some familiar ones are DEX, INX, 
TAB, and CLC. KO replaces these codes the actual 6809 
codes. So. DEX becomes LEAX - 1 ,X and TAB is TFR A,B. 
The code to return with a Bad Path Number error could be 
written: 

LDB #E$BPNUM 
SEC 



The assembler would teplace the SEC with the appropriate 
code. ORCC frSOl. There are 27 mnuemonics in all. They 
provide an alternate mode of piogramming. 

Finally, KO allows the use of local and global labels. 
Labels appear in the first column, the label field. They refer 
to a place in memory where something is stored or an entry 
point of the program occurs. Occasionally, they are set equal 
to some value with the SET or EQU opcode. If a label 
appears more than once (with the exception of SET) in the 
label field, an error of multiply defined labels occurs. Now 
imagine you wish to create a library of subroutines that can be 
merged with you assembly language progiams. Extreme care 
would have to be taken to insure that no labels get used more 
than once. KO removes this problem. It allows using local 
labels. 

SLL 
XFER EQU * 

LDB #10 
_LOOP LDA ,X+ 

STA ,Y+ 

DECB 

BNE _LOOP 

RTS 

ELL 

S LL tells the assembler that everything starting with the 
underscore. "_", is a local label, here it is _LOOP. The ELL 
tells the end of the local labels. The scope of local labels 
exist between the SLL and ELL. The label XFER is global. 
It is recognized to the outside. If it had started the the 
underscore, it would have been a local label too. In another 
part of code, bounded by SLL and ELL. the same local label 
can be reused. 

I have found that these little features make KO a sharp 
little assembler. Even when I am not programming with 
KBASIC, I keep the assembler in my commands directory. 
More and more I am giving my programs the KO punch. 

IT FINALLY ARRIVED 

At long last it is here. Radio Shack has finally produced 
the Color Computer III. By the time you read this, many of 
you will probably be looking for it under your Christmas 
trees. The new machine is a 128K color computer, 
expandable to 51 2K. It has 64 colois and can support screens 
up to 640 X 192 resolution. And best of all the new machine 
will run on OS-9 Level II. 

That is il for this month. Next month we'll bring you 
more on OS-9. Take care! 
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"CRYPTOQUOTE" 



By: Mickey E. Ferguson 

POB87 

Kingston Springs. TN 37082 

] must be getting old. My wife 
says not old, just lazy. (Editor's 
Note: probably both!) You see, 1 
developed the ptogran described here 
by the method 1 have always referred 
to as "Ron Anderson's Lazy 
Programming Method". 1 have 
always programmed by what has 
come to be called ihe Hacker's Creed 
where eveiy byte and every machine 
cycle counted. But this program is a 
bit different; it is ihe first program 
that 1 have ever written where 1 was 
more interested in using it than in 
writing it. 

For many years 1 have been 
hooked on ihe puzzles in the daily 
newspapers. And an un worked 
crossword puzzle is an open 
challenge! But the cryptoquote has 
always been my favorite. Some 
people judge the daily newspapers in 
their town by the editorial content, 
or the coverage of local (or slate or 
national or world) news. Others 
consider ihe sports coverage or other 
things that I haven't even ihought 
about. For me, the only daily 
newspaper worth actually paying 
money for is the one with the 
ciyptoquote in it! 

As ne wspapns lend lo use puzzles 
as fillers, they tend to be stuffed into 
whatever space is available and are 
often rather tiny. I used to copy the 
cryptoquote from the newspaper onto 
notebook paper and work from thai. 
When we got our first computer (an 
SWTPC 6800) 1 wanted to wiite a 
program for it that would allow me 
to use the CRT as my worksheet for 
cryptoquote puzzles. But 1 was not 
skilled enough to write it in 
assembly language; so 1 had to wait 
until we aquired a suitable version of 
BASIC. When SWTPCs 8k BASIC 
airived, 1 wrote the program in 
BASIC. But it ran soooooo 
slcoooooowly that 1 gave up on the 
idea for a lime. When TSC's 
Extended Basic came along, it was 
much faster and finally made my 
cryptoquote program in BASIC a 



viable proposition. The listing in 
figure I is the xBASIC progiam. 

But Ihe xBASIC program still ran 
too slowly for my tastes and I 
happened to have Micro ware's 
A/BASIC Compiler; so 1 converted 
it from xBASIC to A/BASIC and 
compiled it. The listing in Figure 2 
is the A/BASIC program. Now 
A/BASIC probably generates the 
fastest machine code of any BASIC 
compiler ever whiten for the 68xx 
based machines (sure wish 1 had ihe 
source to A/BASIC cause I ihink 1 
could make it faster); but the 
A/BASIC program still ran too 
slowly for my lastes. 

The hacker in me took over and I 
disassembled the machine code the 
A/BASIC program had generated 
with the objeciive of optomizing it 
for speed. This led to the listing in 
Figure 3. Now I am not saying that 
the program in Figure 3 is the 
ultimate opiomization of the code 
lhat A/BASIC had generated; but it 
is a good deal faster and about 750 
bytes shorter. About the only 
comments in Figure 3 are the lines 
of A/BASIC source that caused the 
assembler code to be generated. 
There are several areas where the 
program in Figure 3 could be 
improved but, as 1 said before, 1 was 
more interested in using the program 
than in writing it. 

All three programs function 
identically when run. The CRT 
screen is cleared [PRINT 
CHR$(12)], and you are prompted to 
begin inputting data from the 
ciyptoquote in ihe newspaper. All 
printable ASCII characters are 
allowed as input (except in the 
xBASIC program). Input is 
terminated with a null line, i.e. a 
caiTage return only. The screen is 
then cleared and the ciyptoquote is 
then displayed with a space between 
each letter of a word, ihree spaces 
between words, and two blank lines 
between each line of the encrypted 
quote. A maximum of ten lines of 
fourty characters is allowed which is 
more than enough to handle any 
ciyptoquote 1 have seen. You are 
ihen prompted for a command. The 
command can have one of three 



formats, x=y, RESET, or STOP, x 
and y may be any priniable ASCII 
charac ter and all cccurances of x will 
have y displayed on ihe line directly 
above it in the encrypted text. 
RESET removes all changes you 
have made and displays the encrypted 
quote with two blank lines between 
each line of text. In other words, it 
restores you to the point then you 
stopped inputting ihe quote. STOP 
exits the program and returns you to 
FLEX. 

I felt for sometime that the only 
true hackers left were ihe readers of 
68 Micro Journal. And now 1 
understand that many of the newer 
readers are relative beginners who 
have CoCo's and are wanting to 
learn more about programming it. If 
you fall into the latter calagoiy, you 
may wish to take a good close look 
at the listing in Figure 3. This will 
give you a good idea of the code the 
compiler generates in response to 
BASIC source code. You will see 
the code generated by each line of 
BASIC source is a complete module, 
not depending on the line before it to 
preserve the contents of any 
registers. You will also see things 
like how the compiler sets up a 
FOR loop, and how it deals with ihe 
NEXT at ihe end of ihe loop. Things 
like these you will find useful in 
writing your own programs in 
assembly language. There are many 
subroutines in the run-time package 
part which you will also find very 
useful. For example, the subroutine 
beginning at line 778 determines ihe 
length of a string [the LEN(XS) 
function], the subroutine beginning 
at line 729 prepares a two byte 
binary value for priming as decimal, 
and the subroutine beginning at line 
647 is a buffered input routine 
allowing for backspacing and line 
cancel. 

I still have one little problem. The 
program still runs tooo slocoooooly 
for me. 1 wonder if I could convince 
Foxy (my wife) to let me buy a 
Mustang system for my ciyptoquote 
progiam. 

Cryptoquou it a trademark of King 
Features SyndiMim . ABASIC it a 
trademark ofMuroware Corp. 
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figure 1. 


osopth.s figure 2, 

10 DIM X(l) .¥(1) .Zll) 


10 DIM BS(IO) .CS(IO) 


DIM 05(1, 80) , E5 (1. 80) , 85 ( 10. 80) , CS ( 10. 80) 


20 PRINT CHR$(12) 


STACK-SOFFF 


30 LET X%-0 


20 PRINT CHR5U2) ; 


40 LET X»-X%+1 


FOR X-l TO 10 


50 PRINT "LINE";X%; 


LET BS(X)-"" 


60 INPUT CS(X%) 


LET CSIX)- 1 '" 


70 IF CSIX*)-"" THEN 130 


NEXT X 


80 GOSOB 520 


LET DS-"" 


90 F0R.Y%-1 TO LEN(C$(X%)) 


LET ES-"' 1 


100 LET BS(X%)-BS(X»)+" " 


30 LET X=0 


110 NEXT Y% 


LET Y-X 


120 GOTO 40 


LET Z-X 


130 LET Z%-X%-1 


40 LET X-X+l 


140 PRINT CHRS 112) 


IF X>10 THEN 130 


150 FOR X%-1 TO Z% 


50 PRINT "LINE";X; 


160 PRINT BS(X%) 


60 INPUT BUFS 


170 PRINT C$(X%) 


70 IF BUFS-"" THEN 130 


180 PRINT 


LET CSIX) -BUFS 


190 NEXT Xt 


80 GOSUB 520 


200 PRINT 


90 FOR Y=l TO LEN (CSIX)) 


210 INPUT OS 


100 LET BS(X)-BS(X)+" " 


220 IF DS-"STOP" THEN 600 


110 NEXT Y 


230 IF DS-"RESET" THEN 440 


120 GOTO 40 


240 IF D$-"PRINT" THEN 400 


130 LET Z-X-l 


250 IF DS--CRT" THEN 420 


140 PRINT CHRS (12) ; 


260 IF MID$(DS,2,1)<>"-- THEN 380 


150 FOR X-l TO Z 


270 FOR X%-1 TO Z% 


160 PRINT BS (X) 


280 LET E$-"" 


170 PRINT CSIX) 


290 FOR Y%-1 TO LEN(C$(X%)) 


180 PRINT 


300 IF MIDSICS(X%).Y%,1)<>LEFTS<DS, 1) THEN 330 


190 NEXT X 


310 LET ES-ES+MIDS<DS.3,1) 


200 PRINT 


320 GOTO 34 


210 INPUT BUFS 


330 LET ES-ES+MID5 (35 (X») , Y». 11 


220 IF BUFS-"STOP" THEN 600 


34 NEXT Y% 


230 IF BUFS--RESET" THEN 440 


350 LET BS(X%>-ES 


LET DS-BUFS 


360 NEXT X% 


260 IF MIDS(DS.2.1><>"-" THEN 380 


370 GOTO 14 


27 FOR X-l TO Z 


380 PRINT CHRS (12) ; "WHAT";CHRS (7) 


280 LET ES-"" 


390 GOTO 150 


290 FOR Y-l TO LEN (CSIX)) 


400 EXEC.-PORT-3" 


300 IF MIDSICS(X) .Y.DOLEFTSIDS.l) THEN 330 


410 GOTO 140 


310 LET ES-ES+MIOS(DS,3. 1) 


420 EXEC-PORT-1" 


320 GOTO 34 


430 GOTO 140 


330 LET ES-ES+MIDSIBSIX) . Y.l) 


440 FOR X%-1 TO Z% 


340 NEXT Y 


450 LET E$-"" 


350 LET BSIX1-ES 


460. FOR Y%-1 TO LEN (C$ (X%) ) 


360 NEXT X 


470 LET ES-ES+" " 


370 GOTO 140 


480 NEXT Y% 


380 PRINT CHRSI12) ; "WHAT "(CHRS (7) 


490 LET BS(X%)-ES 


390 GOTO 150 


500 NEXT X% 


440 FOR X-l TO Z 


510 GOTO 140 


450 LET ES-"" 


520 LET DS-"" 

530 FOR W%-1 TO LEN(CS(X%)) 


4 60 FOR Y-l TO LEN (CSIX)) 
470 LET ES-ES+" " 


540 LET DS-DS + MIDS(CS<X%).W*. 1) 


480 NEXT Y 


550 LET DS-DS+" " 


490 LET BS(X)-ES 


560 IF MIDS(DS,LEN(DS)-1.1)-" " THEN LET DS-DS+" - 


500 NEXT X 


570 NEXT W% 


510 GOTO 14 


580 LET CS(X»)-DS 


520 LET DS-"" 


590 RETURN 


530 FOR Y-l TO LENICSIX)) 


600 END 


540 LET DS-DS+MIDSICSIX) ,Y. 1) 




550 LET DS-DS+" ■■ 
- 
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74 








560 


IF MIDS(DS.LEN(0S)-1.1)<>" " THEN 570 


77 






• LET D4-" 


565 


LET OS- 


0S»" •• 


78 








570 


NEXT t 




79 


1032 8E 


OOOE 


LPEX1T LDX 4D_STR 








80 


1035 BD 


13DC 


JSR STMC20 


580 


LET CS(X)-DS 


81 








590 


RETURN 




82 






* LET E$— " 


600 


STOP 




S3 














84 


1038 8E 


OOSE 


LDX IE Sin 


610 


END 


figure 3. 


85 


103B BO 


130C 


JSR STKG20 






84 








1 




NAM 0UOTE.BIN 


»7 
88 






' 0030 LET X-0 


2 

a 




0050 MAXI£N BOO 80 


St 


103E CC 


oooo 


LDD 40 


t 






90 


104 1 DD 


08 


STD X_VAR 


s 




• STANDARD PRE-NAMED LABEL BOUATES 


»1 








( 






92 






• LET Y-X 


j 




CCOO BS CHR COO 4CC00 


93 














94 


1043 DD 


OA 


STD * VAR 


i 




CCC1 DL CHR BOO SCC01 


95 








1 




CD03 WARMS EOO SCD03 














94 






■ LET Z-X 


10 




CD15 GETCXR EOO 5CD1S 


97 








11 




coi8 putchr eoo scoia 














98 


1045 DD 


ec 


STD l_VAR 


12 
13 


oooo 


wc soooo 


99 








14 






100 






' 0040 LET X'Xtl 






101 








IS 


oooo 


XEXT_X 8MB 2 
















102 


1047 9E 


OS 


LD 40 LDX X_VAR 


14 


0002 


NEXT*. RMB 2 
















103 


1049 30 


01 


LEAX l,x 


17 


0004 


HITO RMB 2 
















104 


104B 9F 


08 


$TX X_VAR 


la 


0004 


BOFPNT RMB 2 


105 








it 






104 






■ IF X>10 THEM 130 


20 




• 0010 D1H XIII. Y 43 ) . 2(11 


107 








21 






108 


1040 DC 


oa 


LDD X VAR 


22 


0008 


* VAR HUB 2 
















109 


104P 1011 


000B 


CMPD til 


2] 


OOOA 


T VAR RMB Z 
















110 


1053 24 


4a 


BUS LK 130 


2« 


oooc 


ZVAR RMB 2 
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111 
112 






► 0050 PRINT B L1ME";X: 


2( 




• DIM DS(l.SO) .ESI1.80I ,B$I10,S0) ,CS(10, 801 










27 






113 












114 


1055 BO 


1442 


JSR SETBOV 


28 


OOOE 


D_STR RMB HAXLEN 










2t 


005E 


E_STR RMB MAXLKM 


115 


1058 8E 


1544 


LDX tLlNE 








114 


10SB BO 


1477 


JSR MOVSTR 


30 


OOAE 


BSTR RMB 10>MAXLEN 
















117 


105E DC 


08 


LDD X VAR 


31 


03CE 


C_STR RMB 10'MAXLEK 
















HI 


1040 BD 


1485 


JSR CVTVAR 


32 


04EE 


lO_B0F RMB $81 
















119 


1043 BO 


1448 


JSR PSTRNC 


33 


oi4r 


ST BUF RMB $00 










34 






120 








35 


looo 


MM $1000 


121 






* 0040 1MP0T BOFJ 


31 






122 














123 


1044 BD 


13EF 


JSR 1KP0T 


37 




stack- jorrf 










38 






124 

125 






• 0070 IF BOT$- B " TK£H 130 


31 


iooo Ioce 


OFTF QUOTE LDS 4000TE-1 










40 






124 














127 


1049 ax 


04KE 


LDX |[0 QQf 


41 




• 0020 PRINT CHRSI12I; 










42 






124 


104C BD 


14E1 


JSP. lem" 






129 


1 04F SO 




TSTB 


43 


1004 84 


OC LDA 412 
















130 


1070 27 


4B 


BBO LM_1 30 


44 


1004 BD 


13EC JSR OOTEEE 










45 






131 








44 




• ro» X-l TO 10 


132 






• LET C$IX)-B0F$ 


47 






133 








48 


1001 cc 


0001 LDD 41 


134 


107 2 D4 


09 


LDB X_VAR» 1 


49 


100C DD 


OB STD X_VAR 


135 


1074 84 


50 


LDA IHAXLtN 


50 


100E C4 


OA LOB 110 


134 


1074 30 




NDL 


51 


1010 DD 


00 STD NEXTJC 


137 


1077 C3 


037E 


ADDD tC_Srx-HAXLEN 


52 






138 


107A 8E 


04EE 


LDX t tO_BSF 


53 




• LET B$ IXI-" 


139 


107D BD 


1303 


JSR STRC_1 


54 






140 








55 


1012 Dl 


09 FOR_LP LD8 X_VAR»l 


141 






' 0080 COSOB 520 


54 


1014 84 


50 LDA 4MAXLEM 


142 








57 


1014 3D 


MDL 


143 


loao BO 


12CS 


JSR LNS20 


58 


1017 C3 


005E ADDD 4B_STK-MAXLEN 


144 








51 


101A BO 


1 3D0 JSR STKC_0 


145 






• 0090 ran r-i to lenic$ix|) 


10 






144 








(1 




• LET Ci (XI--- 


147 


1083 BD 


1391 


JSR Y_CDX 


(2 






148 








H 


101D D4 


01 LDB XVAR'l 


14* 






• 0100 LBT BS 1X1-9$ (XI •- ■ 


14 


101T 14 


50 LDA tKAXLEN 


150 








45 


1021 3D 


HOI 


151 


1084 04 


09 


LN_100 LDB X_VA*»1 


« 


1022 CI 


037E ADDD tC_STR-MAXLSN 


152 


1088 84 


50 


LOA tMAXLEM 


47 


1025 BD 


1 3D0 JSR ST»C_0 


153 


108A 3D 




MDL 


«a 






154 


108B C3 


OOSE 


ADDS •B_STR-MAXLEM 








155 


108C 34 


04 


PSHS 


(9 




* HEXT X 










70 






154 


1090 04 


09 


LDB X_VAR»1 






157 


1092 84 


50 


LDA IKAXLEN 


71 


1028 60 


13SC JSR HEXTX 










72 


loja id 


E $ BLT FOR, LP 










73 


102D 24 


03 BMZ LfKXIT 










74 


102P 50 


TSTB 




To Be Con 


75 


1030 27 


EO B80 rOR^LP 
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Forth 



C LIBRARY ROUTINE 

CONVERSION to 

FORTH 

There are a lot of very good programs available in 
the public domain written in C, but I prefer to work 
in FORTH. Therefore, if I am going to make use of 
the programs, / must first convert them to FORTH. 
As one step in that process, I have written a series of 
routines which duplicate the action of C library 
routines for working with ASCII strings. Some of 
these routines are duplicated here. 

The listing called CHARTEST.FTH is in FLEX 
text file format to make it easier to use in creating 
programs. If you prefer to work with the traditional 
FORTH screen format, then I recommend that you 
put each routine in a separate screen. 

As you can see from an examination of the 
CHARTEST.FTH listing, the routines are 
essentially self-documenting. The routines are not 
necessarily as short as they could be, but each one 
has been as thoroughly tested as practical, and there 
should be no surprises. 

Each routine is entered with the character to be 
tested on top of the Data Stack. The routine replaces 
the tested character with a Boolean flag, so the 
character must be saved elsewhere, if it is to be used 
again. The flag is either the defined TRUE or the 
defined FALSE, which allows the proper testing of 
ASCII <NULL>. 

Not all of the routines are limited to the classical 
Eaker form of CASE . It was necessary to use the 
additions developed by Monroe. Since these 
definitions do not appear in all versions of FORTH, 
I have included them with this article. 

Notice that the Eaker part of the CASE structure 
has to be different, depending on whether you are 
using fig-FORTH or FORTH-83. If you have 
trouble compiling CASE, it may be because you are 
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using the wrong version. However, the Monroe 
extensions to the CASE structure are the same in 
both versions of FORTH. 

DIFFERENCES 

AMONG VERSIONS 

of FORTH 

As I have said before, there are three "official" 
versions of FORTH floating around in the 68xx 
world. Fortunately, these FORTHs are more alike 
than they are different, so most programs written for 
one version will run on another version. Normally, 
the only changes will be obvious ones where a 
definition has a new name. 

However, their was a major change in one type 
of operation. In fig-FORTH, there are so-called 
"state smart" words, but this was changed for 
FORTH-83 (I am not sure about FORTH-79)."State 
smart" means that FORTH knows when it is in the 
compiIing-fct^g-and-^fc^i-it4&4ft-thg-4R4e rpr et} ng 
state. This is important, because a non-state smart 
FORTH must have different words for some 
operations, depending on its current state. An 
example is the FORTH word ' (pronounced "tick") 
which fetches the address of the next word in the 
input stream. In fig-FORTH, ' has only one form, 
but in FORTH-83, ' must be used while 
interpreting, but ['] must be used while compiling! 

State smart words work in fig-FORTH, because 
there is a user variable called STATE , which is 
checked whenever a state sensitive word is 
encountered. If this word contains a FALSE , then 
one version of the definition is executed; 
otherwise, another version is executed. 

I bring up the subject because there are some 
other words to look out for when changing from one 
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version of FORTH to the other. I'll try to provide a 
complete list of them at another time. But, if you 
have a program which worked fine in fig-FORTH, 
but cannot be compiled in FORTH-83, this may be 
the problem. You can recognize one of the 
symptoms as compiler failure because of an empty 
stack. 

Two cases in point are shown in this article. Both 
ASCII and the CASE structure have to be changed to 
work with fig-FORTH or with FORTH-83. Notice 
how the loss of state smartness has complicated 
ASCII . Only one definition is sufficient for 
fig-FORTH, but two definitions have to be used to 
cover all bases in FORTH-83. 

ASCII 

ASCII is a somewhat ambiguous wad, since it is 
not really necessary. It is one of those words you 
use for convenience, rather than any other reason. 
ASCII simply takes the next character in the input 
stream and places it on the Data Stack. You could do 
the same thing by simply looking up the ASCII 
value of the character and placing it in the input 
stream. In other words, ASCII Y is the same as 89 
in decimal or 59 in hex. But that is precisely the 
point; if you don't use the word ASCII , you must 
know which number base you are working in, as 
well as the ASCII value. Furthermore, later 
debugging is simplified by having ASCII Y in the 
program text instead of a mysterious number which 
must be looked up in a usually-not-so-handy table. 

ASCII in fig-FORTH can be used directly from 
the keyboard, or within a colon definition. On the 
other hand, in FORTH-83, 'ASCII is the word to be 
used from the keyboard, but ASCII is the form to be 
used within a colon definition. If you try to use 
ASCII from the keyboard in FORTH-83, you will 
get an error signal. Even if you remove ?COMP 

from the definition of ASCII, you will still get the 
error signal. The real problem is in the phrase 
[COMPILE] LITERAL , which simply bombs from 
the keyboard; but without it, you cannot compile 
ASCII . 

By the way, the ' in 'ASCII in this context is 
"prime" and not "tick". Don't get confused by the 
similar appearence; I chose ' for this definition in 
order to make sure that the character would appear 
on any keyboard. Go ahead and change the ' to 
something else, if you prefer, just change it in both 
definitions. 

CASE IN FORTH 

A veiy flexible CASE structure for FORTH is 
available in the public domain. The version of CASE 
most often used is the one offered by Dr. C. E. 
Eaker in "FORTH DIMENSIONS", published by 
the FORTH Interest Group. Later on, A. J. Monroe 



presented an expansion to Eaker's work in the same 
publication. A number of other people have also 
offered CASE structures, but none have had the 
popularity of Eaker's. 

A version of this CASE structure is listed here. 
Eaker's work was modified by W. M. Federici to 
work with FORTH-83. I found that Monroe's 
extensions worked as well for FORTH-83 as they 
did for fig-FORTH. Unfortunately, it was necessary 
to list the definitions with very little comment in 
order to be sure of enough space to get it all in. If 
you need to add CASE to your FORTH, just copy it 
and worry about understanding it later. 

Notice that there aie four essential words to the 
basic CASE structure, and the compilation will 
bomb if any are omitted or out of order. 

CASE introduces the structure by making sure 
that it is within a colon definition by using ?COMP . 
The current Return Stack pointer is saved for later 
use during compilation. A " 4 " is put on the Data 
Stack for syntax checking. 

OF uses " 4 7PAIRS " to insure that it follows 
either CASE or ENDOF . The comparison with the 
index value is made with " = " and a conditional 
branch is set up. If the match is found to be TRUE , 
then DROP is used to clear the Data Stack; 
otherwise, the byte is left for the next comparison. A 
" 5 " is put on the Data Stack for syntax checking. 

ENDOF uses " 5 7PAIRS " to insure that it 
follows OF . It then compiles the branch to 
ENDCASE and puts a " 4 " on the Data Stack for 
syntax checking. 

ENDCASE uses " 4 7PAIRS " to insure that it 
follows either CASE or ENDOF . A DROP is used 
to clear the Data Stack and all of the conditional 
branches are resolved. The Return Stack pointer is 
restored, and the CASE structure is finished, 
restored, and the CASE structure is finished. 

Any expression between the last ENDOF and 
ENDCASE will be executed only if none of the 
selector keys matched. This is the proper location for 
the "otherwise" or default expression. 

As you can see, this is as versatile a CASE - 
structure as can be found, especially when you add 
Monroe's extensions for greater than, less than, and 
lower-upper limits. By the way, in the last 
definition, the lower limit must be given before the 
upper limit, or this section will never execute. 

ADAPTING TO YOUR SYSTEM 

You will have to know which type of FORTH 
you are using in order to know which version of the 
listing to enter. If you are not using Federici's 
"FF9", you are probably using some version of 
fig-FORTH. I think that most versions for the CoCo 
are advertised to be fig-FORTH. Test the 
fig-FORTH definition of ASCII from the keyboard; 
if it compiles, you probably have fig-FORTH. If that 
doesn't work, then type in the other. One should 
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work; if not, please let me know. Certainly, do not 
try to load both versions at the same time, since only 
the last one typed could possibly work. 

Stems Electronics FORTH for the CoCo is not a 
true fig-FORTH. It appears to be very much like 
FORTH-79; I have not had an opportunity to test it 
fully, but I think that it would run the fig-FORTH 
version shown here. 

As I have said before, these listings are written as 
FLEX text files. If you prefer, there is no reason 
why they could not be entered as conventional 
FORTH screens. Just don't split definitions across 
screens, as that is very poor practice; it makes 
debugging more difficult than it should be. 

FF9 on the CoCo 

Good news! I just got word that Wilson 
Federici's "FF9" will now run on the CoCo with 
SK*DOS or FLEX. / have tried it with 
DATA-COMP FLEX andFF9 ran like the proverbial 
charm. 

As a result of my misunderstanding of how the 
new typesetting program works, a couple of 
illustrations in the September, 1986 column got 
messed up. I have rewritten them here in hopes that 1 
have finally got it right. Correction #/ shows how 
the coding of a definition is organized, and 
correction #2 shows how the FORTH stacks are 
organized. I am sorry for the problem, and J hope 
that you were still able to get something useful from 
the column. 

EOF 

Corrections: 

nli word U coaplled to: 



I Conatanta, FORTH-*! 



Machine Coda 
i307 

t: 

«1C1 
USB 
0130 

oicr 
or»« 
aict 

DOJC 



Function 
Linkage eddreaa to the prevloua word 
Nam lattar count OR £60 
AA with lent lattar OK 1>0 
Procaea a -color" definition 
Duplicate tha top atack number 
Add tha two top atack nuebera 
Sand <CR/LP> to tha dlaplay device 
Sand tha top atack number to tha dlaplay 
End a "colon" definition 



CORnCCTION II: Tha atructura at a typical definition. 

ior 

FORTH and tha 6809 aLsonl appeal to be nada for each other, 
alnca FORTH makaa ua« of four 16-bJ.t polntora/etacka. Thete 
usually are: 

IP Y ree., pc-tnta to neat executable word 

5p u ree. j polnta to top of Oata stack 

RP S rag,, polnta to top of Return Stack 

w x rao ,. polnta indirectly to word being oaacuted 

Tha 0, X, and CC reolatara can generally be uaed freely within a 
definition without concern, but the other thrae reglatara auat 
be atorad before uaa and racowered before aniline from a 
definition. 

COfUUCTION 12: Pointer and atack uaaga. 

■or 



-1 CONSTANT TRUE 
CONSTANT FALSE 



I * * 

'. ASCII convarta a tent character Into a literal 

( R. Helallng. FORTH OIKENSIONS. 1II/3. p. 72 

I Adapted to FORTR-B3 by R. 0. Lurie 

( 'ASCII cannot be uaad within a colon detlnltlont 

I ASCII auat be uaad within a colon definition! 

I Tha character auat be delimited by blanket 

I : 11 ASCII A EMIT i -> A at dlaplay 



( 



: 'ASCII < number I 

tl NOSD 1* C* I 

: ASCII ( convert a character Into a literal 

7C0MP 'ASCII [COMPILE) LITERAL 1 IMMEDIATE 

( 

( 

( CASE atructura 

( C. E. Eakar, FORTH DIMENSIONS. 11/3, pp , 37-10 

I Adapted to FORTH-93 by n. m. rederlcl 

( 

: CASE 7COHP CSP * SP> CSP I 4 / IMMEDIATE 

; OF 4 7PAIRS COMPILE OVER COMPILE - COMPILE 7BRANCH 
>MARK COMPILE 0ROP S I IMMEDIATE 

I ENOOF 3 7PAIAS COMPILE BRANCH >MARK SNAP 
>RES0Lve i l IMMEDIATE 

: ENDCA5E a JPAISS COMPILE DROP BEGIN SP> CSP » - 0- 
NHILE >RESOLVE REPEAT CSP I I IMMEDIATE 



A J Monroe. FORTH DIMENSIONS. Ill/o. p. I«7 



KOF) 
OWE* > 

IF DROP TR0E 
ELSE FALSE THEN ; 

<0r I LESS THAN taat 

« 7PAIRS COMPILE KOFI COMPILE 7BRANCH 
HERE 0,5; IMMEDIATE 

OOF) 
OVER < 

IF DROP TRUE 
ELSE FALSE TREN 1 

>0F I CHEATER TXAX teat 

a 7PAIRS COMPILE OOFI COMPILE 7BAANCR 
HERE 0,1; IMMEDIATE: 

RANGE 

>R OVER OOP B> U < 
IT SNAP I- > 
IF DROP TRDE 
ELSE FALSE THEN 
ELSE DROP DROP FALSE THEN I 

RNO-OF ( lnclualve AAHCE teat 

4 7PAIRS COMPILE RARCE COMPILE 7BRANCH 
HERE , 5 I IMMEDIATE 



CHARTEST.rU 

FORTH routlnaa which acconpllah the a 

corresponding C routlnaa: 

laalpha laalnum laaacll 

lad!91t lalower leupper 

lapunct laapace 



ROL 07/11/B6 
job a> tha 



lacntrl 
laprlnt 
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( 7ZSALPHA cett for A-l or a- 1 RDL 01/10/06 ] 
I 

: 7 1 SULPHA ( e — bool i 

CASE 

ASCII X ASCII 1 RNG-Cr TRUE EXOOP 

Men a xscn i Ruc-or true oioor 
eroeasi 

KiP TRUE - HOT I T rALSE THEN , 

( 

( 7ISALPHAMUMZA1C teat for 0-1 or A-t or a-l RDL 06/04/16 ) 
I ) 

: 7131USMUKERIC ( c bool 1 

CASE 

ASCII ASCII 9 WW Or TROT EN0CT 

ascii a ascii l AMC-or true otocr 

ASCII • ASCII 1 W»G-Of TRUE ENDOr 
ENDCASE 

OOP TRUE • HOT IT TALSE THEN I 

, , 

( 7 IS ASCII teat tor an ASCII character ROl 01/10/06 1 
( I 

! ?I5ASC1J I C — bool ) 

t «•"* j 

I 7ISCNTAL teat for a control character RDL 01/10/86 I 

< * * I 

: 7ISCWTRL ( e — bool i 

CASE 

tt <or TRUE Enoor 
in or TRUE EHOOr 

EHDCASE 

SUP TRUE • NOT ir TALSE THE* / 

( ) 

| 7ISDICIT teat (or 0-» ROl 01/10/06 i 

I » 

1 7ISDICIT ( c bOOl ) 

CASE 

Asci: o ascii » utc-or true ENoor 

ERTJCA3E 

OUP TROT • HOT ir rALSE TREH I 

1 I 

1 7ISLOWCA taat for a-i RDL 01/10/06 I 
I > 

; 7ISL0HER I c bSOl ) 

CASE 

ASCII a ASCII I RHG-OT TRUE MOOT 
ENDCASE 

OOP TRUE - NOT ir rALSE THEN I 

i 1 

i 7ISUPPER ta»t tor A-t RDl 01/10/16 ) 
< * 1 

: 7ISUPPER I c --- bool ) 

CASE 

ASCII A ASCII E RHC-OP TROT IRDOr 
ENDCASE 

DUP TRUE - NOT ir rALSE THE" ( 

< * 1 

I 7ISPAINT taat for <SP>— RDL 01/10/16 ) 
t * " * * *••*• I 

! TISPRINT < C -— bool ) 

CASE 

BL ASCII - RJC-or TRUE ENDOr 
ENDCASE 

0UP TRUE - NOT ir rALSE THEN I 

FOR THOSE 



teat for punctuation 



RDL 06/04/16 } 



: 7ISP0RCT I c — bool ) 

CASE 

ASCII i ASCII / RPO-OT TRUE MOOT 

ASCII t ASCII ? RNC-Cr TRUE UfOOT 

ASCII ( ASCII ' RRG-OP TRUE IROOr 

ASCII I ASCII - RNC-CT TRUE MOOT 

ENDCASE 

DUP TRUE - SOT ir PALSE THIS / 



I 7 1 S3 PACE 
I 



teit for <sp><TASxLr><rr><CR> rdl 01/10/16 



< c bool ) 



CASE 








3} or TRUE ENDOr 






t <s?> t 


09 or true moor 






t <TAB> \ 


10 or true moor 






I <1T> 1 


1} or TRUE ENDOr 






t <rr> i 


U or TROt ENOOr 






I «CR> » 


ENDCASE 








OUP TRUE - HOT IP 


TALSE 


Tsn ; 





Conatanta. riC-r0R.TR 



1 CONSTANT TROE 
CONSTANT rALSE 



ASCII convarta a taat character Into a literal 
R. Melallno. roATN OINEMSIOMS. 1II/J. p. 72 
The character myat be delimited by blanat: 
■ TX ASCII A EMIT I -> A at dlipley 



ASCII t — ntrnber ) 
St HORO HERE 1« CO 
(COKPILEl LITERAL / IMMEDIATE 



CASE atructure 

C. E. Eakar. TORTH DIHENSIONS. Il/J, PP. 37-40 
Modified by A J Monroe. FORTH OIKENSIONS. Ill/i. p. 1(7 
Modified by R. D. Luria 



CASE 7COHP CSP I ICSP 4 ; IMMEDIATE 

tor) over - ir drop true else palse then ; 



Or 4 7PAIM COMPILE (OH COMPILE OBAAMCH 

HERE . 5 I IMMEDIATE 



ENOOr S 7PAIRS COMPILE BRANCS HERE . SNAP 
} [COMPILE) THEM < I IMMEDIATE 



ENDCASE 4 7PAIRS COMPILE DROP SECIN SPt CSP • - . 

HRILX 1 ICOHFXtXl T»EN REPEAT CSP t ; IMMEDIATE 



eot 
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KarfLur* 
7349 W. Canterbury 
Peoria, AZ 85345 



A CUSTOM 
FLEX 



Ihe accompanying article describes the steps 
I used in generating a new version of FLEX for a 
recently-completed 6809 system. The hardware 
is a 68B09 with 64K, DSDD 2/3 height Remex 
drives, two serial ports and counter/timer. It is a 
wirewrapped board that fits onto a 5.25" disc 
drive, using PLAs to reduce the chip count. 

The new FLEX system for this machine was 
put together over several weekends, using an 
older 6809 system as the developement (host) 
system. This software development taught me a 
great deal about the FLEX operating system. I 
have even more respect for the job TSC did with 
FLEX than 1 did before 1 started this project 

FLEX is a versatile and elegant solution to 
the problem of an operating system for a single 
user on a single machine. The fact that 1 was 
able to customize a FLEX for one machine into a 
FLEX for a s»cond, very different (with regards 
to I/O addressing) machine in so little time, 
speaks highly for the care that TSC put into their 
original design of FLEX. 

With the prices of 68XX chips and haidware 
so low, and considering how easily FLEX can be 
customized for new hardware, a do-it-yourself 
64K (or more) 6809 system can be done by 
nearly any experienced hobbyist. For me, this is 
a large measure of the enjoyment 1 get from 
working with the 6809. 

Another large part of my fun with the 6809 
systems concerns the excellent job done by you, 
your staff and your readers. 1 have read (and 
subscribed) to many computer magazines in the 
past. 68' Micro Journal is my only remaining 
subscription and it is the only magazine that still 
carries for me the enthusiasm and excitement of 
the early days of computing. In particular, the 
input from readers around the world makes 68' 
Micro Journal a very unique magazine. 

Speaking of which, the thing that got me 
started on this article was a letter/article appearing 
in the October 1986 issue from Neil Preston of 
Zimbabwe(l). Neil talked about his efforts in 
putting together a 6809 system and expressed 
First of all, 1 wish Neil the best of luck in 
putting his system together. He sounds like he is 
making good progress. He talks about changing 
from 8" to 5.25" drives. 1 don't know much 
about the inner workings of the Uniboard, but if 



it uses the 2793 style FDC, he should be able to 
alter the disc data clock by switching pin 25 
(ENMF*) high or low. Details can be found in 
the Western Digital Storage Management 
Products Handbook or a WD2793 data sheet. 
Note that if his system uses the 2795/2797 FDC 
instead, this technique is not immediately 
available, as that pin is used for side select output 
(SSO) instead. 

About his concern that he will be left behind 
by the 68XXX technology; that will probably not 
be a problem for a while. A 6809 system still 
does everything 1 need to do for my hobby, even 
though 1 have an Apple II sitting on the next desk 
and 1 use a 68020 graphics system at work 

'Editor's "Hfu: TharJki (Karl for the nice Cttur and your 
article on converting 9'LTX. I guns that w will certainly Be 
around as long as there arc foKj mfho, &k$ yourself, arc uniting 
to share and help those less knowledgeable ftXX arUS'Kf'DQS 
are stilt the finest single tasking, single user systems around. 
JULX may Have a feu) gouhas' fun and there. But over the 
years, somewhere in 68 (Micro Journal, I Believe someone 
addressed those subjects. If not, they wiSL just wait 

Thank} 'Kpii, I and thousands of readers certainly do 
appreciate ad of you who contribute. 

68 Micro Journal isn tjust all paper and ink, It is all tnost 
mho contribute, than really what 68 Micro Journal is. 

TrMW 

The task of customizing a FLEX operating 
system for a 6809 computer is not trivial, but is 
within the reach of an assembly language 
programmer with the proper tools. These tools 
include a host 6809 system on which to develop 
the new FLEX system, as well as an assembler, 
debugger and editor. Additionally, the programmer 
should have a copy of the FLEX Adaptation 
Guide, written by Technical Systems Consultants. 
Attempting to create a new FLEX system without 
this guide is asking for a lot of headaches. 

The system creation consists of three major 
tasks. The FLEX system itself must be customized 
for the target machine. Secondly, the NEWD1SK 
formatter program must be modified to properly 
interface with the system's disc drives. Finally, an 
appropriate one-s«ctor loader must be prepared and 
added to the new NEWD1SK program so the discs 
formatted on the new system may be booted by that 
system. 
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The FLEX system 

The FLEX operating system is divided into three 
major components. FLEX. COR is the main body 
of the FLEX system and handles all file control 
blocks (FCBs) used by the system. It also 
processes user input, generates output and controls 
disc accesses at the highest level. 

FLEX' interaction with the user's terminal is 
handled by the routines in the FLEX10.BIN file. 
Similarly, FLEX' interaction with the system discs 
is done with the FLEXDISC.BIN routines. These 
last two .BIN files must be customized for the 
target system, as the locations of status and 
command registers vary among designs. 

FLEX.COR is normally supplied with every 
FLEX system. If you are using FLEX on the host 
machine, you should already have a copy of 
FLEX.COR available. The remainder of the FLEX 
system is built by APPENDing the appropriate 
FLEXIO and FLEXDISC binary files onto the 
FLEX.COR file. The file created by this APPEND 
operation is named FLEX .SYS and is the new 
FLEX system. 

My target system has DSDD 5.25" 40-track 
drives. The floppy disc controller (FDC) is a 
WD2793. The FDC status/command registers 
occupy memory from $E018-$E01C, while the 
drive, side and density select is done through 
address $E014. This is quite different from the 
setup in my host system, so I had to create a new 
FLEXDISC.BIN file. 

As I did not get the source for my host system's 
FLEXDISC.BIN, I used a disassembler to 
generate an assembler source file of the code in 
locations SDEOO to SDFFF, the area in a standard 
FLEX system reserved for the disc primitive 
routines. If you must start completely from scratch 
in developing your FLEXDISC source file, you 
can use the Adaptation Guide to help your 
development. Appendix G of the Guide gives a 
listing of the disc driver routines for the SWTPC 
MF-68 disc system and makes an excellent starting 
point. 

After I disassembled my host's disc diivers, I 
changed the proper routines to reflect the hardware 
described above. In particular, I modified the 
READ and WRITE routines to change density if a 
"record not found" error is encountered. This 
causes FLEX to try different densities 
automatically if it can't find the proper sector. This 
means that my new FLEX system handles 
double/single density discs without instructions 
from the user. Details on this technique are 
available in the Guide on pages 40-41. 

An impioved SEEK routine was also needed. 
The new SEEK uses the proper bits in the system 
drive select address ($E014) to control side and 
density select. The selection is made based on the 
desired sector number and the status of the disc 



driver's internal density table. Again, consult (he 
Guide, page 41 for details. 

Incidentally, the SEEK routine in the SWTPC 
drivers contains a $1B as the seek command issued 
to the controller (a 1771 FDC). This seek 
command causes a step rate of 20ms on a IMhz 
system and occurs in the area of SDE80. Changing 
this value to $1 A will produce a 10ms step rate and 
$19 will produce a 6ms step rate. On my host 
system, I patch this code in FLEX at boot-time by 
overwriting it with a 1-byte long program ORGed 
at the appropriate address. On the new system, I 
simply wrote the source code to use the step rate I 
wanted. 

The final source code for the disc drivers was 
assembled and the object written to my new 
FLEXDISC.BIN file. The terminal primitive file 
FLEXIO.BIN was created by SA VEing the desired 
area of memory ($D370-$D3FF) from my host 
system to disc. This was possible because the 
terminal I/O sections for both machines are 
identical. If you need to create customized terminal 
drivers for your new FLEX system, consult the 
Guide, pages 6-8. 

The three files that make up the new FLEX 
system are APPENDed together into a larger single 
file with a command similar to the following: 

APPEND FLEX.COR FLEXDISC.BIN 
FLEXIO.BIN MIKEFLEX.SYS 

A word about transfer addresses: the FLEX 
system is loaded from disc as any other binary file, 
with one important exception. It must have only 
one transfer address and this transfer address must 
be the last data stored in the file. As described 
above, FLEX.COR has no transfer address in it, 
FLEXDISC.BIN was assembled without an 
address label on the final END line in the source 
file, and FLEXIO.BIN was written to disc with a 
command like: 

SAVE FliXIOBIN D370 D3FF CDCO 
Thus, when all three files are appended together, 
the final transfer address is $CDO0. This should 
be verified with a command such as MAP, that 
looks at the addresses affected by .BIN or ,CMD 
file. 

The NEWDISK command 

The next step in creating the new FLEX system 
is to modify the NEWDISK (or similar) command 
that formats a floppy disc. In my case, I had two 
things to worry about. First, the method used for 
selecting density in my new system did not match 
the method used in the SWTPC-based NEWDISK 
program that came with my original FLEX 
package. Second, I needed to change the bootstrap 
loader that is written to track 0, sector 1 by the 
formatter routine as one of its final steps in 
formatting a disc. 
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The first task was done quickly, using a 
disassembly of the original NEWDISK command 
to locate the few locations of interest. Then, the 
DEBUG program was used to GET the 
NEWDISK.CMD file into memory, the necessary 
areas were patched, and the altered code was 
SAVEd back to disc, this time as FORMAT.BIN. 
The second of these tasks took a little more work 
and the Guide was very valuable for this phase. 

When a FLEX disc formatter finishes formatting 
a disc, it also writes a small (one or two sector) 
bootstrap loader to the disc, starting at track 0, 
sector 1. Later, when the system is booted from 
this disc, the ROM-based bootstrap loader loads in 
the disc- based bootstrap and transfeis to it. 

This disc-based bootstrap is really little more 
than SEEK and READ routines, with a few file 
loader instructions in between. However, the 
READ and SEEK routines must select the side and 
density of the floppy disc in exactly the same way 
used by FLEX. This means that the new FLEX 
system will be bootable from either a single-density 
or double-density disc, with density and side 
selections done automatically. 

Moreover, the disc-based bootstrap must be 
memory -resident when the formatter needs it. This 
means that both programs must load into memory 
from one command. 

The disc-based bootstrap routine was written to 
reside in memory from $C100-$C1E8 and 
contained no transfer address. I was able to write 
the bootstrap such that it fitted into only one sector. 
If you n»ed more than one sector to hold your disc- 
based bootstrap, consult the Guide for details on 
how to handle the extra sectors. More information 
can be found in a disassembly of the SWTPC 
NEWDISK program, if you have it available. 

All that remained in finishing the FORMAT 
command was to use the DEBUG program to patch 
in the address of the new disc-based bootstrap 
module (ORGed at $000), save the FORMAT file 
back to disc, then APPEND the LOADER.BIN file 
to it with a command such as: 

APPEND FORMAT.BIN LOADER.BIN 
FORMAT.CMD 

Since my target Systran could boot a single-side, 
single-density disc written by my host system, I 
now used the target system to format a double- 
sided disc, then used the EXAMINE command (a 
single sector read/write program) to verify that the 
proper bootstrap had been written to track 0, sector 
1. This completed the development of the new 
FLEX system, but I still had one last thing to do. 

FOR THOSE WB 



The ROM bootstrap 

This last step involved altering the ROM-based 
bootstrap for the target machine. The changes 
were needed because the old ROM bootstrap had a 
conflict between where it located the stack and 
where it placed the disc-based bootstrap as it read it 
in. Though this was a minor change, I also took 
the time to make a fairly significant change. 

The ROM-based bootstrap described by TSC in 
their FLEX User's Manual (page 3.6) has a very 
annoying flaw. When this code is executed, it 
does a brute-force read of 256 bytes from the disc 
and jumps to $C000, without verifying that the 
data was read properly. It doesn't even check to 
see if it read 256 bytes! This means that 
sometimes, depending on conditions such as disc 
speed, sunspot activity, recent stock market prices, 
etc., my system simply will not boot. 

Besides rewritting this bootstrap to jump to 
$000 (the location of my disc-based bootstrap 
following a boot), I also added code to verify that 
no error status codes were returned by the FDC 
and that a full 256 bytes were read. If either of 
these tests fail, I issue a restore and try again. 

After the new bootstrap was burned into 
EPROM and installed in the target system, I was 
ready to finally put all the pieces together. A single- 
sided disc containing the new FLEX system (called 
MIKEFLEX.SYS) and the FORMAT command 
was generated on the host system. The LINK 
command was used to connect MIKEFLEX.SYS 
to the disc-based bootstrap loader and the disc was 
ready for booting on the target system. 

Pressing reset on the target system and 
executing the bootstrap code loaded the new FLEX 
system into memory and it executed properly. I 
felt there should have been more fanfare to this first 
booting of a new system than the simple '+++' 
FLEX prompt, but it WAS exciting to see the boot 
take place! 

The last thing to test was FORMATting a disc 
on my new system and attempting to boot it. This 
worked exactly as expected and my new FLEX 
system is up and running. In fact, I wrote this 
article on it. 

Special thanks to Brian Bierer of Phoenix, AZ, 
for his help and suggestions on the disc primitives. 
He helped make the job go easier. 

EOF 
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MICROWARE 
EXPANDS....AGAIN 



On June 13, 1986, Microwaic Corp, developers for 
OS-9, celebrated ground breaking ceremonies for the 
second major expansion, in less than three yeais. 

Ken Kaplan, President and CEO reported thai due to 
the pressuies of additional personnel and greatly 
increasing customer acceptance for OS-9, and other 
Microware software products, the building and 
grounds expansion was both a current necessity and a 
commitment to the future. The new facility will 
encompass over 8,000 square feet and will house the 
expanding administrative and marketing departments. 
They expect to be completely moved into the new 
facilities by January 1987. 

Recent additions to the Microware staff ate: 

Ken Mizuno, software engineer. Ken is originally 
from the Microware Japan Branch. Ken will be 
working on NFM and CD-I software tools. 

Richard Russell, software engineer, came up 
through the ranks, so to speak, and still uses his home 
system, running Microware C, in designing compilers 
and other software. 



Kim Gegner, receptionist, is a native of Des Moines 
and formerly worked in the research and data entry 
department of a Des Moines bank. 

Paula Henderson, production clerk, is still attending 
the University of Northern Iowa. Paula works in the 
production department. 

Christy Longstaff, cook, is one of the more 
appreciated members of the staff, I imagine. The 
personnel at Microware have their own kitchen and 
dining area. Christy is also a Des Moines native. 

Robert Wolf, electronics engineer, with a 
background in digital design and machine language 
programming. Robert has already developed an 
application package for cooperative buying clubs. 

We wish then all success and happiness in their new 
vocations. And, it is nice to see Microware expanding 
at such a rapid pace. Guess they must be doing 
something right. Congratulations all! 

DMW 




Ktn Kapiax. PrtiyidJU and CEO of Iticrw* C<wp brmti grvwid 
M<ik rt» first jAow/ of din. M>cre**m iiaff mtxtm too*, on. 




Ttu ww 8JK0 sqwxr* foot c^kvukmi to xto A/icrawo/* cor^Ui. 
Siiuaud in a waaeUd and qmis ana of D*i Mouw, tkt Mujww* 
Jocilitu: rtprumt itu modtrx Off titan of %igh itclt' vhan (pan km. 



68' Micro Journal 



December '86 



29 



(615)842-4600 



T«(*« « 106006630 



842-4600 A 

tin iitr 

8900 C«i««nfl'« Smith Ha 

Mi. ton TN 37343 



til 1*1*1 *4t-<*0< 



CoCo oa-e- Fli»~ 

SOFTIDflRE 



SPECIAL 



K-BASIC 

K-BASIC under OS-9 and FLEX will compile 
TSC BASIC, XBASIC and XPC Source Code Files. 




K-BASIC now makes the multitude of TSC XBASIC Software 
available for use under OS-9. Transfer your favorite BASIC 
Programs to OS-9, compile them, Assemble them, and BINGO 
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favorite Operating System! 
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DISASSEMBLERS 

SUPER SLEUTH from Computer Syiiemi Consultants 
Interactive Disassembler; extremely POWERFUL! Disk File 
Binary/ASCII Examine/Change. Absolute or FULL 
Disassembly. XREF Genenior, Label "Name Changer", and 
Files of "Standard Label Names* for different Operating 
Systems. 

Color Compultr SS-SO Bus (all w/ At,. Sourct) 

CCO (32K Reqdi Ob). Only S49.M 

F, S99M ■ CCF, Obi. Oily SS0.M U. SIMM 

CCF, wISource S99.M 0, SIMM 

CCO, Obj. Only 150 00 
DYNAMITE* - Excellent standard "Batch Mode" Disassembler. 
Includes XREF Generator and "Standard Label* Files. 
Spacial OS-9 options w/ OS-9 Version. 

CCF, Obj. Only SIMM • CO, Ob). Only S 59.95 

F. " " SIMM . O, objtct only SI50D0 

U, m m S3M.M 

PROGRAMMING 
LANGUAGES 

PL/9 front Windrush Micro Systemi - By Graham Troll. A 
combination Editor Compiler Debugger. Direct source. lo- 
objecl compilation delivering fast, compact, re-entrant, 
ROM-able, PIC. t & 16 bit Integers & 6 digit Real 
numbers for all real-world problems. Direct control over 
ALL System resources, including interrupts. Comprehensive 
library support; simple Machine Code interface; step-by-sicp 
tracer for instant debugging. 500* page Manual with 
tutorial guide. 

F. CCF - SI98.M 

PASC from S.E. Media - A Flex 9 Compiler with a definite Pascal 
"flavor". Anyone with a bit of Pascal experience should be 
able to begin using PASC to good effect in short older. The 
PASC package comes complete with three sample programs: 
ED (a syntax or structure editor), EDIIOR (a simple, public 
domain, screen editor) and CHESS (a simple chess program). 
The PASC package come complete with source (written in 
PASC) and documentation. 
FLEX S9SM 

WHIMSICAL from S.E. MEDIA Now supports Real Numbers 
"Structured Programming" WITHOUT losing the Speed and 
Control of Assembly Languagel Single-pass Compiler 
features unified, user-defined I/O; produces ROMable Code; 
Procedures and Modules (including prc-compilcd Modules); 
many "Types" up to 32 bit Integers, 6-digil Real Numbcri, 
unlimited sizad Arrays (vectors only); Interrupt handling; 
long Variable Names; Variable Initialization; Include 
directive; Conditional compiling; direct Code insertion; 
control of the Stack Pointer etc. Run-Time subroutines 
insetted as called duiing compilation. Normally products 
10% less code Iran PU9. 
Fond CCF -SI9S.M 

KANSAS CITY BASIC from S.E. Media - Basic for Color 
Compultr OS-9 with many new auMundj and sub functions 
added. A full implementation of the IP-THEN-ELSE logic is 
included, allowing nesting to 255 levels. Strings arc 
supported and a subset of the usual suing functions such as 
LEFTS. RIGHTS. MIDS. STRINGS, elc. arc included. 
Variables are dynamically allocated. Also included are 
additional fealurea such as Peck and Poke. A must for any 
Color Computer user running OS-9. 
CoCo 059 S39.95 

C Compiler from Windrush Micro Systems by James 
McCosh. Full C for FLEX except bitfields, including an 
Assembler. Requires Ike TSC Relocating, Assembler if user 
desires lo implement his own Libraries 
F and CCF . S29S.M 
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C Compiler from Introl - Full C except Doubles and Bit 
Fields, streamlined for the 6809. Reliable Compiler; FAST, 
efficient Code. More UNIX Compatible than mosl. 
FLEX. CCF. OS-9 (Level II ONLY,, U ■ SS7S.O0 
PASCAL Compiler from Lucldata -- ISO Based P-Code 
Compiler. Designed especially for Micropore piiier Systems. 
Allows linkage to Assembler Code for maximum flexibility. 
F and CCF S" - S99.9S F 8' ■ S99.9S 
PASCAL Compiler from OmegaSoft (now Certified 
Software) - For the PROFESSIONAL: ISO Based. Native 
Code Compiler. Primarily for Real-Time and Process 
Control applications. Powerful; Flexible. Requires a 
"Motorola Compatible" Relo. Asmb. and Linking Loader. 
F and CCF - S425.00 ■ One Year Maim. SIMM 
OS-9 69000 Version - S900O0 
K BASIC - from S.E. MEDIA - A "Native Code" BASIC 
Compiler which is now Fully TSC XBASIC compatible. 
1 he compiler compiles to Assembly language Source Code. 
A NEW, strum lined. Assembler is now included allowing 
the assembly of LARGE Compiled K-BASIC Programs. 
Conditional assembly reduces Run-time package. 

FLEX, CCF. OS-9 Compiler /Assembler SI99.M 
CRUNCH COBOL from S.E. MEDIA - Supports large subset of 
ANSA Level 1 COBOL with many of the useful Level 2 
features. Full FLEX File Structures, including Randan Fues 
and the ability lo process Keyed Files. Segment and link 
large programs at runtime, or implemented is a set of 
overlays. The System requires 56K and CAN be run with a 
single Disk System. A very popular product 
FLEX, CCF; Normally S199DO 
Special Introductory Price S99.9S 
FORTH from Slearns Electronic! - A CoCo FORTH 
Programming Language. Tailored lo the CoCol Supplied on 
Tape, transferable lo disk. Written in FAST ML. Many 
CoCo functions (Graphics, Sound, etc.). Includes an Editor, 
Trace, elc. Provides CPU Carry Flag accessibility. Fast 
Task Multiplexing, Clean Interrupt Handling, elc. for the 
"Pro". Excellent "Learning" tooll 
Color Computer ONLY ■ SS8.9S 
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CROSS ASSEMBLERS 

TRUE CROSS ASSEMBLERS from Compuier Systems 
Consultants Supports 1802/5, Z-80, 

6800/1/2/3/8/1 l/HCll, 6804, 680S/HC0S/ 14680S. 
6809/00/01. 6S02 family. 8080/5, 8020/I/2/3S/C3S/39/ 
40/48/C48/49/C49/50/8748/49. 8031/51/8751. and 68000 
Systems. Assembler and Lifting formats not n target 
CPU*! formal. Pioducei machine independent Motorola S- 
Texl. 

FLEX. CCF, OS 9. UniFLEX each - 350.00 
any 3 objects or source (not 68000 >■ 3 100. 00 
Set of AIL object $200.00 ■ source $300.00 
UniFLEX 69000 . ISO M . source $1. 000. 00 
XASM Croa* Assesablersfor FLEX from S.E. MEDIA - This 
let of 6800/1/2/3/5/8, 6301, 6502. 8080/5, and 280 Croat 
Anemblen uie> the familiar TSC Macro Assembler 
Command Line and Source Code formal, At tern bier option), 
etc. in providing code for the target CPU'l. 
CompUte set. FLEX only - 3)50.00 
CRASMB from LLOYD I/O - Supporu Motorola'!, Intel'i, 
Zilog'i, and other's CPU ayntax for there 8- Bit 
microprocessors: 6800, 6801. 6303. 6804. 6805, 6809, 
6811 (all varieliei): 6502, 1802/5, 8048 family. 8051 
family, 8080/85. Z8. Z80. and TMS-7000 family. Hu 
MACROS. Local Labeli. Label XREF, Label length to 30 
Chan. Object code formata: Motorola S-Recordt (text), 
Intel HEX-Racorda (text). OS9 (binary), and FLEX (binary). 
Written in Aisernbler ■ ■■ eg . Very Fan. 
Availibaity: MOTOROLA, INTEL, OTHER, COMPLK1ESET 
CPUi CPUa CPUa CPUi 

FLEX9 S150 S150 S150 1399 

OS9/6809 J150 $150 S150 J399 

OS9/68K J432 

CRASMB 16.32 from LLOYD I/O - Supporu Motorola! 
68000, and hat tame featurei n nhe 8 bit veriion. 
OS9/68K Obj**» code Format allowi thii croti mem bier to 
be uied in developing your program! for OS9/68K on your 
OS9/6809 computer. 

FLEX. CCF, OS-916809 124900 

UTILITIES 

Batk09 XRef from S.E. Media •• Thii Baaic09 Cron 
— Reference Utility ii a Be*ic09 Program which will produce a 
"pretty piinted* lining with each line numbered, followed 
by a complete croai referenced lining of all variable!, 
external procedure!, and line number! callad. Alto includei 
a Program Lilt Utility which output* a fait "pretty printed" 
i i lining with line number*. Require! Baaic09 or RunB. 

\ O A CCO obj only - 139 95; wt Source - 179.95 

BTree Routines - Complete act of routinei to allow limple 
implementation of keyed filei - for your programs - running 
under Baiic09. A real time laver and should be a pan of 
eveiy lerioua programmers tool -box. 
O A CCO obj. only - $8995 
Lucldata PASCAL UTILITIES (Require* LUCIDATA Patcal 

ver3) 

Availability Laaands- 

F.FLEX. CCF.Col»Compu<«FtEX 

O -0&9. CCO = Color Compulsr OS-9 

U. UniFLEX 
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XREF — produce a Cmi Reference Lifting of any text; oriented 

to Patcal Source. 
INCLUDE -- Include other Filei in a Source Text, including 

Binaty - unlimited netting. 
PROFILER - provide* an Indented, Numbered. "Structogram" of 

a Patcal Source Text File; view the overall itructure of Urge 

program!, program integrity, etc. Supplied in Petal Source 

Code; require! compilation. 

F, CCF — EACH 5--U0M. 8'- 15000 
DUB from S.E. Media •- A UniFLEX BASIC decompiler 

Re-Create a Source Lining from UniFLEX Compiled batic 

Piogwnt. Work* w/ ALL Venion* of 6809 UoiFlEX basic. 
U . $219.95 

DATABASE 
ACCOUNTING 

XDMS from Westchester Applied BuslneiiSystems - 
Poweiful DBMS; M.L. program will wotk on a single tided 
5" ditk. yet ia F-A-S-T. XDMS Level I provide! an "entry 
level" Syitem for defining a Data Bate, entering and 
dunging the Data, and producing Rcpr.nu. XDMS Level II 
add* the POWERFUL "GENERATE" facility wiih an Engliih 
language Command Structure for manipulating the Data to 
create new file Structure*, Sort, Select, Calculate, etc. 
XDMS Level JJI add* ipecial "Utilities" which provide 
additional eate in letting up a Data Bate, auch aa copying 
old data into new Data Structures, changing System 
Parameter*, etc 

XDMS System Manual . $24.95 

XDMS Lv/ / • F A CCF - J/29.95 

XDMS Lv/ UFA CCF - $199.95 

XDMS LmI HI ■ F A CCF ■ $269.95 
XDMS IV from Westchester Applied Business 
Syitem* -XDMS IV it a brand new approach to data 
management. It not only permits users to describe, enter 
and retrieve data, but also to process entire files producing 
customized reports, screen displays and file output. 
Processing can consiil of any of a set of standard high level 
functions including record and field selection, toning and 
aggregation, lookups in other file*, ipecial processing of 
record subset*, custom report formatting, totaling and 
tubtotaling, and presentation of up to three related file* a* a 
"database" on user defined output reports. 

XDMS IV . F. CCF STAR.DOS. SK'DOS 3350 00 

Upgrades to XDMS IV . S250W 

MISCELLANEOUS 

TABULA RASA SPREADSHEET from Computer Sytlemt 
Consultants -- TABULA RASA ii similar to 
DESKTOP/PLAN; provide! ute of tabular computation 
schemes used for analyais of buiincii, islet, and economic 
conditions. Menu-driven; exteniive report-generation 
capabilities. Require! TSCs Extended BASIC. 

F and CCF, U . $50.00. wi Source - 310000 
DYNACALC - Electronic Spread Sheet for the 6809 and 
68000. 

F, OS.9 and SPECIAL CCF - $200.00. U - 3395.00 
OS-9 68K - $59500 
FULL SCREEN INVENTORY/MRP from Compuier Systems 
Consultant! -- Ute the Full Screen Inventory 
System/Materials Requirement Planning for maintaining 
inventories. Keep! item field file in alphabetical order for 
eaiier inquiry. Locate and/or print records mulching partial 
or complete item, description, vendor, or attributes; find 
backorder or below ttock leveta. Piint-oot* in item or 
vendor order. MRP capability for the maintenance and 
analyaia of Hierarchical assemblies of items in the 
inventory file. Requires TSCs Extended BASIC. 
F and CCF. U . 150.00, wi Source - $100100 
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FULL SCREEN MAILING LIST from Computer Systems 
Consultants - The Pull Screen Mailing List System provide! 
• meant of maintaining simple mailing liiu. Locate all 
record! ms.tchrng on partial or complete name, city, ilate. 
zip, or attribute* for Lining! or Labels, etc. Requires TSC's 
Extended BASIC. 

F and CCF. U . SSO.OO. wl Sourct - S 100 00 

DIET-TRAC Forecaster from S.E. Media - An XBASIC program 
that plana a diet in terms of either calorie* and percentage of 
carbohydrates, proteins and fata (C P G%) or grams of 
Carbon ydiate. Protein and Fat food exchanges of each of the 
six basic food groups (vegetable, bread, meal, skim milk, 
fruit and fat) for a specific individual. Sex, Age, Height, 
Present Weight, Frame Size. Activity Level and Basal 
Metabolic Rate for normal individual are taken into account 
Ideal weight and sustaining calories for any weight of tbe 
above individual are calculated. Provides number of days 
and daily calendar after weight goal and caloric plan is 
docrminad. 

F - 159.95. U - SS9.95 



LOW COST PROGRAM KITS from Southeast 

Media •■ The following kits are available for FLEX on either 

5 or 8 inch disk. 

1. BASIC TOOL-CHEST M9.95 
BUSTER.CMD: preuy priner 
LWEXRE F.BAS: line CTOM-reicrencer 
REMPAC.BAS.SPCPACBAS.COMPACBAS: 
remove superfluous code 

STRIP.BAS: superfluous line-numbers stripper 

2. FLEX UTILITIES KIT $39.95 
CATS.CMD: alphabetically-sorted directoty listing 
CATD.CMD: daie-ioitcd di/waory lining 
COPYSORT.CMD: file copy, alphabetically 
COPYDATE.CMD-. file copy, by date-oider 
FILED ATE.CMD: change file creation dale 

INFO CMD (A INFOGMX.CMD): tells disk attributes & 

contents 

RELUMK.CMD (& RELINK82): re-orders fragmented fr«e 

chain 

RESQ.CMD: undeletes (recovers) a deleted file 

SECTORS.CMD: show sector order in free chain 

XL.CMD: super text lister 

3. ASSEMBLERS/DISASSEMBLERS UTILITIES 

$39.95 
LINEFEED, CMD: 'modularise' disassembler output 
MATIi.CMD: decimal, hex, binary, octal conversions A 
tables 
SKIP.CMD-. column stripper 

4. WORD - PROCESSOR SUPPORT UTILITIES 

$4 9.95 
FULLSTOP.CMD: chacks for capitalization where requited 
BSTYCJT.BAS (.BAC): Stylo to dot-matrix printer program 
NECPRrMT.CMD-. Stylo to dot matrix pr nter filter code 

5. UTILITIES FOR INDEXING $49.95 
MENU. B AS: selects tequired program from list below 
INDEX.B AC: word index 

PHRASES.BAC: phrase index 

CONTENT.BAC: table of contents 
INDXSORT.BAC: fast alphabetic son routine 
FORMATER.BAC: produces a 2 -column formatted index 
APPEND BAC: append any number of files 
CHAR BIN: line reader 

FULL SCREEN FORMS DISPLAY from Computer Systems 
Consultant* — TSC Extended BASIC program support* any 
Serial Terminal with Cursor Control or Memory-Mapped 
Video Displays: substantially extends the capabilities of the 
Program Designer by providing a table-driven method of 
describing and using Full Screen Displays. 

F and CCF, U - OS .00. wt Sourct - IS0O0 
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SOLVE from S.E. Media - OS-9 Levels I and II only. A 
Symbolic Object/Logic Verification & Examine dehugger. 
Including inline debugging, disassemble and assemble. 
SOLVE IS THE MOST COMPLETE DEBUGGER we have seen 
for the 13809 OS-9 series] SOLVE doe* it all I With a rich 
selection of monitor, anembler, disassembler, 
environmental, execution and other miscellaneous 
commands, SOLVE is the MOST POWERFUL toolkit item 
you can ownl Yet, SOLVE is simple to usel With complete 
documentation, a snapl Everyone who has ordered thi* 
package has raved! See review - 68 Micro Journsl - 
December 1985 No 'blind' debugging here, full screen 
displays, rich and complete in information presented. Since 
review in 68 Micro Journal, this U our fastest moverl 
Uvrls I Jk II only - OS-9 Regular S149.9S 
SPECIAL IN-ITlODUCnON OFFER S69.9S 

DISK UTILITIES 

OS-9 VDIsk from S.E. Media - For Level 1 only. Use the 
Extended Memory capability of your SWTPC or Gimix CPU 
card (or similar format DAT) for FAST Program Compiles, 
CMD execution, high speed interprocess communications 
(without pipe buffers), etc. - SAVE that System Memory. 
Virtual Disk size is variable in 4K incitements up to °60K. 
Some Assembly Required, 

Uvtl I OS-9 obj. S79.95; <W Sourct 1149 95 

O.F from S.E. Media - Written in BASIC09 (with Source), 
includes: REFORMAT, a BASIC09 Program that reformats a 
chosen amount of an OS-9 disk to FLEX Format so it can be 
used normally by FLEX: and FLEX, a BASIC09 Program that 
does the actual read or write function to the special O-F 
Transfer Disk: user-friendly menu driven. Read the FLEX 
Directory, Delete FLEX Files, Copy both directions, etc 
FLEX users use the special disk just like any other FLEX 
disk 

■ 6809/68000 S79.95 

LSORT from S.E. Media - A SORT/MERGE package for OS-9 
(Level I & II only). Sons records with fixed lengths or 
variahle lengths. Allows for either ascending or descending 
son. Sorting can be done in either ASCII sequence or 
alternate collating sequence. Right, left or no justification 
of data fields available. LSORT includes a full set of 
comments and errors messages. 
OS-9 WOO 

H1ER from S.E. Media - HIER is o modtrn hitrorctial storagt 
syiltmfor ustrs under FLEX. It answers the need* of those 
who have hard disk capabilities on iheir systems, or many 
files on one disk - any size. Using H1ER * regular 
(any) FLEX disk (8 • 5 • hard disk) can have sub 
directories. By this method the problems of assigning 
unique names to files is lets burdensome. Different files 
with the exact same name may be on the same disk, as long 
a* they are in different directories. For the Winchester user 
this becomes a must. Sub-directories are the modern day 
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solution ihit all cuncai large systems uie. Each 
directory look! lo FLEX like ■ regular rile, 
except they nave tbt extension '.DIR'. A full set 
of directory handling programs ire Included, miking the 
operation of ICIER simple end straightforward. A special 
iniull package ii included to install HIER to your particular 
version of FLEX. Some assembly required, Install indicitei 
each byte or reference change needed. Typically - 6 byte 
changet in source (furnished) and one alterably of HIER i« 
all that i» requited. No programming requited! 
• lmlro4utlU>m Special • S69.95 

COPYMULT from SB. Media •• Copy LARGE Dirks to several 
•mailer disks. FLEX utilities allow tie backup of ANY size 
disk to any SMALLER sUe diskettes (Hard Disk lo floppies, 
8" lo 5", etc) by simply inserting diskettes as requeued by 
COPYMULT. No fooling with diractoiy deletions, etc. 
COPYMULT.CMD understands normal "copy" syntax and 
keeps up with files copied by maintaining directories for 
both holt and receiving disk system. Also includes 
BACKUP.CMD to download any size "random" type file; 
RESTORB.CMD to restructure copied "random" files for 
copying, or rccopying back lo the host system; and 
FREEUNX.CMD a> a "bonus* utility that "relinks" the free 
chain of floppy or hard disk, eliminating fragmentation. 

Compicttty documented Assembly Language Sourct files included. 
ALL 4 Program (FLEX. *" or 5 V S99S0 

COPYCAT from Lucidata -Pascal NOT required. Allows reading 

ZTSC Mini II IX. SSB OOS68. and Digital Research CP/M 
Disks while operating under FLEX I.O. F1.EX 2.0, or FLEX 
TT\ 9.0 with 6800 or 6809 Systems. COPYCAT will not 
«C peifomt miracles, but, between the program and the manual. 
^" you stand a good chance of amanpliahing a transfer. Also 
** includes some Utilities to help out. Programs supplied in 
V Modular Source Code (Assembly Language) to help solve 
1 unusual problems. 

1 F and CCF 5" • 150DO F *" - S65O0 

VIRTUAL TERMINAL from SB. Media - Allows one 
terminal lo do the work of several. Tlie user may start as 
many aa cigtil task on one terminal, under VIRTUAL 
TERMINAL and switch back and forth between task a] will. 
No need to cs.it each one; just jump back and forth. 
Complete with configuration program. Toe beat way lo keep 
up with (hose background piogrami. 
O A CCO - obj. only - $49.95 
FLEX DISK UTILITIES from Computer Systems ConsullanU - 
- Eight (8) different Assembly language (w/ Source Code) 
FLEX Utilities for eveiy FLEX Users Toolbox: Copy a File 
with CRC Errors; Test Disk for errors; Compare two Disks; 
a fast Disk Backup Program; Edit Disk Sectors; Linearise 
Free-Chain on the Disk; prior Disk Identification; and Son 
and Replace the Disk Oiiecuxy (in sorted order). - PLUS •• 
Ten XBASIC Programs including: A BASIC Resequencer 
with EXTRAs over "RF.NUM" like check for missing label 
definition!, processes Disk to Disk instead of in Memory, 
etc. Other programs Compare, Meigc, or Generate Updates 
between two BASIC Programs, check BASIC Sequence 
Numbers, compare two unsequcnoad Tiki, and 5 Piogrami for 
establishing a Master Directory of aeveral Disks, and 
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sorting. Selecting, updating, and printing paginated listings 
of these files. A BASIC Cross-Reference Program, written 
in Assembly language, which provide* an X-Ref Listing of 
the Variables and Reserved Words in ISC BASIC. XBASIC. 
and PRECOMPILER BASIC Programs. 
ALL Utilities include Source* (either BASIC or AL. Sourct 
Code). 

F and CCF - ISO. 00 

BASIC Utilities ONLY for UniFLEX. - 130.00 

COMMUNICATIONS 

CMODEM Telecommunications Program from Computer 
Systems Consiliums, Inc. -- Menu-Driven; support! Dumb- 
Terminal Mode, Upload and Download in non-protocol 
mode, and the CP/M "Modem 7" Cbrjsienien probzcol mode 
to enable communication capabilities for almost any 
requirement. Written m "C". 

FLEX, CCF, OS.9, UniFLEX; with complete Source 
SI 00 00 without Source S50.00 

UniFLEX 66000 with complete Source SIOO.00 
X-TALK from SB. Media - X-TALK consists of two disks and a 
special cable, the hookup enables a 6809 SWTPC computer 
to dump UniFLEX Hies directly to the UniFLEX MUSTANG- 
020. This is Ihe ONLY currently available method to 
transfer SWTPC 6809 UniFLEX Hies to a 68000 UniR.F.X 
system. Gimii 6809 users may dump a 6809 UniFLEX file 
to a 6809 UniFLEX five inch disk and it is readable by the 
MUSTANG -020. The cable is specially prepared with 
internal connections to match the non-standard SWTPC SOfJ 
I/O Db25 connectors. A special SWTPC S+ cable set is also 
available. Users should specify which SWTPC system 
he/she wishes to communicate with the MUSTANG 020. 
The X-TALK software ia furnished on two disks. One eight 
inch disk contains S.E. Media modem program C-MODEM 
(6809) and the other disk ii a MUSTANG-020 five rod) disk 
with C MODEM (68020). Text and binary files may be 
directly transferred between the two systems. The C- 
MODEM programs are unaltered and perform as excellent 
modem programs also. X-TALK can be purchased with or 
without the special cables, but this special pticc is available 
to registered MUSTANG-020 users only. 

XTALK Compltlt (cable, 2 disks) 199.95 
X-TALX Software (2 dak, only) $69 95 

XTALK with CMODEM Source SI49.9S 
XDATA from S.E. Media - A COMMUNICATION Package for the 
UniFLEX Operating System. Use with CP/M. Main Frames, 
other UniFLEX Systems, etc. Verifies Transmission using 
checksum or CRC; Re-Transmits bad blocks, etc 
11 . S299.99 

ASSEMBLERS 

ASTRUK09 from S.E. Media - A "Structured Assembler for Ihe 
6809" which requires the TSC Macro Assembler. 
F, CCF - S99.9S 
Macro Aitembler for TSC - The FLEX STANDARD 
Assembler. 

Special ~ CCF 135.00; F 150.00 
OS M Extended 6809 Macro Assembler from Lloyd I/O. 
Provides local labels. Motorola S-records, and Intel Hex 
records; XREF. Genedrate OS-9 Mentoiy modulea under 
FIEX. 

FLEX, CCF, OS.9 199 00 
Relocating Assembler/Linking Loader from TSC. - Use 
with many of the C and Pascal Cooipikn. 
F. CCF 1150.00 
MACE, by Graham Troll from Windiosh Micro Systems - Co- 
Resident Editor and Assembler, fast interactive A.L. 
Programming for small to medium -sized Programs 
F. CCF . S75J00 

XMACB - MACE w/Tross Assembler for 6800/1/ 

2/3/8 F. CCF . M.OO 
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EDITORS & 

WORD PROCESSING 

JUST from S.E. Medii - Text Formatter developed by Ron 
Anderson; for Dot Matrix Priiilen, provide! many unique 
features. Output "Formatted" Tut to the Display. Use the 
FPtUNT.CMD supplied for producing multiple copies of the 
"Formatted" Ten on the Primer INCLUDING IMBEDDED 
PRINTS* COMMANDS (very useful al other times tUo, and 
worth the price of the program by itself). "User 
Configurable" for adapting to other Printers (conies set up 
for Epson MX -80 with Graftrax); up to tea (10) imbedded 
"Printer Control Commands". Compensates for a "Double 
Width" printed line. Includes the normal line width, 
margin, indent, paragraph, space, vcitical skip lines, page 
length, page numbering, centering, fill, justification, etc. 
Use with PAT or any other editor. 

' Now supplied as a two disk set: 

Disk *1: JUST2CMD object fit*. JUST2.TXT PL9 source FLEX ■ 
CC 

Disk «. JUSTSC obj4d and source in C: FLEX ■ 0S9 . CC 

The JTSC and regular JUST C source are two separate programs. 
)TSC compiles to a version that expects TSC Word 
Processor type commands, (.pp .sp .ce etc.) Great for your 
older text files. The C source compile! to a standard syntax 
JUST.CMD object file. Using JUST syntax (.p ,u ,y etc.) 
With all JUST funciiona plus several additional printer 
formatting functions. Reference the JUSTSC C source. For 
those wanting an excellent BUDGET PRICED word 
processor, with features none of the others have. Ihis is ill 

DirA (I) . PL9 FLEX only ■ F A CCF ■ $49.95 

Disk Set (2) F A CCF A 0S9 (C version) ■ $69.95 

OS-9 68K000 complete with Source ■ $79.95 
PAT from S.E. Media - A full feature screen oriented TEXT 
EDITOR with all the best of "PlE ,y ". For those who swore 
by and loved only PIE . this is for you I All PIE features and 
much morel Too many features to list. And if you don't 
like these, change or add your own. PL-9 source furnished. 
"C" source available soon- Easily cooliguicd to your CRT, 
with special oottiig section. 

Regular FLEX $!29i0 

' SPECIKl, INTRODUCHON OFFER * $79.95 

SPECIAL PAT/JUST COMBO (wisource) 
FLEX $99.95 

OS-9 68K Version $229.00 

SPECIAL PATUUST COMBO 6SK 1249.00 
Note: JUST in "C" source avai'obte for 0S-9 
CEDR1C from S.B. Media • A screen oriented TEXT EDITOR with 
availability of 'MENU' aid. Macro definitions, configurable 
'permanent definable MACROS' - all standard features and the 
fastest 'global' functions in the west- A simple, automatic 
terminal config program makes this a real 'no bane)' 
product Only 6K in size, leaving the average ayalem over 
165 lectori for text buffer - appx. 14,000 plus of free 
memory! Extra Tine for programming as well as text. 

Regular $129.95 

SPECIAL INTRODUCTION OFFER FLEX $69.95 
BAS-EDIT from S.E. Media • A TSC BASIC or XBASIC screen 
editor. Appended to BASIC or XBASIC, BAS-EDIT is 
transparent to norma) BASIC/XBASIC operation. Allows 
editing while in BASIC/XBASIC Supports the following 
functions: OVERLAY, INSERT and DUP LINE. Make 
editing BASIC/XBASIC programs SIMPLE! A GREAT time 
and effort saver. Programmers love ill NO more retyping 
entires lines, etc. Complete with over 25 different CRT 
terminal configuration overlays, 

FLEX. CCF. STARIMS Regular $69.95 

Limited Special Offer: $39 95 



(615)842-4600 



T»l«x 6108008830 



,842-4600 A 

% *1ft lift? 
% Jtffttlft 

5900 Cassandra Smith Rd 
H,x«on. TN 37343 



lor Information 
call (till 141-isot 



CoCo oa-9" flix" 

SOFTUIflAE 



SCREDITOR III from Windrush Micro Systems - Powerful 
Screen -Oriented Editor/Word Processor. Almost 50 different 
commands; over 300 pages of Porumrntaiioo with Tutorial. 
Features Multi-Column display and editing , "decimal align" 
columns (AND add them up automatically), multiple 
keystroke macros, even/odd page headers and foolers, 
imbedded printer control codes, all justifications, "help" 
support, store common command series on disk, etc. Use 
supplied "set-ups", or remap the keyboard to your needs. 
Except for proporuooaJ printing, this package will DO IT 
ALU 

6800 or 6809 FLEX or SSB DOS. OS-9 - J/73.00 

SPELLB "Computer Diclionaty" from S.E. Media - OVER 
150,000 worrit! Look up a word from within your Editor 
or Word Processor (wilh ike SPH.CMD Utility which 
operates in the FLEX UCS). Or check and update the Text 
after entry: ADD WORDS to the Dictionary. "Flag" 
questionable words in tbe Text, "View a word in context" 
before changing or ignoring, etc. SPELLB first chocks a 
"Common Word Diclionaty", then the normal Dictionary, 
then a "fmaul Word list", and finally, any "Special Word 
List" you may have specified. SPELLB also allows the use 
of Small Disk Storage system s. 
F and CCF - $129.95 

STYLO-GRAPH frum Great Plains Computer Co. - A full- 
screen oriented WORD PROCESSOR - (uses the 51 x 24 
Display Screens on CoCo FLEX/STAR DOS. or PBJ 
Wordpak). Full screes display and editing: supports the 
Daisy Wheel proportional printers. 

NEW PRICES 6809 CCF and CCO ■ $99.95. 
F or - SI 79.95. U - $299.95 
STYLO-SPELL from Great Plains Computer Co. - Fast 
Computer Dictionaiy. Complements Stylograph, 
NEW PRICES 6809 CCF and CCO - $69.95. 
F orO . $99.95. U - $149.95 
STYLO-MERGE from Great Plains Computer Co. - Merge 
Mailing List to "Form" Letters, Print multiple Files, etc., 
through Stylo. 

NEW PRICES6809 CCF and CCO ■ $59.95. 
F orO - 179.95, U - $129.95 
STYLO-PAK — Graph ♦ Spell + Merge Package Deal 
F or - $329.95. U ■ $54995 
0. 68000 $595.00 

GAMES 

RAPIER • 6809 Chess Piogram from S.E. Media - Requires 
FLEX and Displays on Any Type Terminal Fescues : Poor 
levels of play. Swap side. Point scoring system. Two 
display boards. Change skill level. Solve Checkmate 
problems in 1-2-34 moves. Make move and swap sides. 
Play white or black. Tbla if one of the strongest 
CHESS program! running on any microcomputer. 
estimated USCF Rating 1600* (better than most 'club' 
players at higher levels) 
F and CCF - $79.95 



Availability Ugands- 

f - FLEX. CCF - Color Cornouar FLEX 

O . OS-9. CCO = Color Computsr OS-8 

U . UriFLEX 

CCO - Color Compulat Cask 

CCT - Color Computer Taps 

'C^rsaTrirdarnarkolMicrowari aadfttotoroia 

' FLEX Is a Traosmarti ol TeoV«4 Systems Consist ants 



Please Specify Your Operating System & Disk Size !!! 
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68 MICRO JOURNAL Writers Guide 

Please note ihe following guidelines for articles and oiher disk submitted material for publication in 68 Micro 
Journal. Due to our new system of entering and editing text for 68 Micro Journal, the following brief outline and 
example is made available for your informal] on, should you decide to submit material for publication. 

We accept material on diskettes in FLEX, OS-9, RS, WORD and MacWrite format, also files may be modem 
downloaded at 1200 baud. We need advance notice for modem delivered files. All text files (article) should have no 
space-bar formatting,, ftease) Spaces are of different widths in typesetting. This is due to the nature of scaled fonts. 
That is. each typeface and font size has a different width, hence, the space is different in various pans of a document 
So, if you use a space to indent, or to align columns, it will be a mess when we have the typesetter output your 
work of love! PLEASE...Iet us put in Ihe formatting. If a column(s) needs to line up, note that in some 
other manner, but Pf.FASF DO NOT use spaces to make your text look straight, aligned, centered, columinized. 
or any other text style or formal. 

We use a tab system that is very precise. Tabs we insert to foimat, align on all available boundries. as well as 
decimal points, etc. We need to be the ones to put the tabs in, according to how wide, type size, type face, font style, 
etc., O.K.? 

The following example text file is as we would like to receive ALL disk files for publication. 

PLEASE NOTE: Because we use either a fixed space typeface or a printer output for code source listing, 
complete source listing can be space formatted. However.. .very important. ..if you put fragments of souice code inline 
with your regular text file, PLEASE LEAVE OUT THE SPACE FORMATTING. We will attempt lo 
resiruc lure (formal) it with our tabbing system. Otherwise put sources, listings, etc. in a separate file. 

Example listing: 

This is an example of text submitted for publication in 68 Micro Journal. It is be 

st thai it have no carriage returns, except at the end of a paragraph. Only one (1) space between 

•A* INSERT FIG. 1.0 HERE (NOW WE KNOW WHAT TO DO WITH SEPARATE LISTINGS) 

sentences and no extra carriage returns (no extra line(s) between paragraphs). Extra lines sho 
uld only be between subject headings as below. 

THIS IS A SUBJECT HEADING 

Note that there was an extra carriage return (with linefeed done automatically by most syst 

ems) directly above subject heading. This is the way that your text (disk) file should look if we list it out to t 

he screen. 

THIS IS A SAMPLE OF INLINE CODE 

UILDA«34, X+100 
l-ISTA TEMP 
etc. 

Please note the source inline code (inline with your text file) as closed to a source code file that is separate from 
the text file. That file (separate file) can have spaces for formatting as it will be reproduced on a printer that is space 
fixed for the entire type style and font The 'l-f in ihe above source inline code is prefixed with a symbol for a space. 
This alerts our opaator to attempt a reasonable tab format on the code, or whatever. It might be any son of column 
dependant text. However, WE must be the ones to format all inline text (code or otherwise). 

Please note that if there is very much inline code it should have the "'INSERT HERE*" typed in (or some other 
indicator to let us know what is desired by you. ..sec *A* above). Otherwise it should be a separate file to be 
appended to the text portion of the file. 

(Clip & save for future reference) 



36 December '86 68' Micro Journal 



Simple Winchester 



by: Samuel L Green Pti.D. 
13052 Femtrafc Lane 
CrewCoeurMO 63141 



This article describes the inexpensive installation 
of a Winchester haid disk drive into a SWTP 6809 
computer. With little change this applies to many 
other brands ofSSO Bus systems also - DMW. 
This implementation assumes that the motherboard 
decodes the I/O slots to have 16 addresses per slot 
and that the I/O range is decoded so that a 2k RAM 
can be addressed at $E800. Modifications to 
motherboard decoding are described in the 
Appendix. 

My implementation costs less than $300 and 
includes a 5 megabyte drive which was available 
surplus for less than $100. The controller is a 
WD1000-05 which sells for $160 or $185 from my 
Western Digital distributor depending on whether 
you work for a company which rates a discount A 
simple host inteiface card installs in the SS-30 bus 
and connects to the controller via a 40 conductor 
ribbon cable. The controller connects to the printed 
circuit board on the drive with two ribbon cables. A 
34 conductor ribbon cable is daisy chained to all 
drives with a termination resistor DIP in the last 
drive just like floppy drives. The drive also has an 
address decode switch like a floppy to set the drive 
number. A 20 conductor ribbon cable handles the 
high speed read/write data between the controller and 
the Winchester drive. The controller has four 20 pin 
connectors, and a separate 20 conductor ribbon cable 
is used for each drive. 



Implementation 

costs 

less than 

$300 

and includes 

a 

5 megabyte drive 



The WD 1000-05 looks like a parallel pon which 
requires eight addresses. Other Winchester 
controllers use a SASI or SCSI inteiface which has 
handshaking lines. The WD 1000-05 is simpler to 
hook up and simpler to get running. 

Two sets of software drivers are piovided to operate 
the Winchester drive. They are compatible, and 
either may be used. The first called WINDRIVR is 
based on the article by David Graves which appealed 
in the October and November 1982 issues of the 
'68' Micro Journal, for which I remain veiy 
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grateful. His drivers were a modification to those 
written earlier by R. Zeff and were written for an 
earlier version of the Western Digital Winchester 
controller board. I revised the code to work 
properly with the WD 1000-05 aid»d by my friend 
Jim Babb. Other changes are to use true data lather 
than inverted data since my host interface board is 
installed in the SS-30 bus rather than the SS-50 bus. 
Memory consuming in-line code to read and write 
sectors is replaced with looping code with no 
noticable loss of speed. 

The second set of Winchester drivers called VDW is 
incorporated into the Scudiere drive selector which 
allows up to four floppy drives, four Winchester 
drives, and one virtual drive (RAM Disk) to be used 
in the same system in any combination of four at one 
time. This is based on the excellent article by Matt 
Scudiere in the December 1982 issue of the '68' 
Micro Journal. My friend Robert Arnzen helped 
make the virtual disk work and added the feature 
which automatically finds and uses all extended 
addressed memory which is uniquely addressed. 

Both WINDRIVR and VDW still incorporate the 
Graves/Zeff limitation of using each head of a 
Winchester as a different logical drive. This sounds 
primitive, but it works very well in a system with 
only one Winchester drive which has two heads. 
When my system boots, drive is a floppy, drive 1 
is virtual, drive 2 is the system Winchester drive 
(head 0), and drive 3 is the working Winchester 
drive (head 1). Also, flex only accomodates track 
numbers from to 255, so higher number tracks are 
presently wasted in my system. It is a 
straightforward exercise to translate physical heads 
and tracks and sectors into logical track and sector 
numbers which flex can accomodate. The drivers 
provided will work with the first two heads and the 
first 256 tracks of whatever drive you try. Note that 
a very old drive like the Seagate ST-501 does not 
have buffered seek so that a delay must be added 
between track steps. The Tandon TM-501 and the 
Shugan SA-604 work fine. 

I have recently received new Winchester drivers from 
Leo Taylor which he offered in the June 1986 issue 
of the '68' Micro Journal. His drivers allow use of 
track numbers higher than 255 and partitioning of 
disks into as many as 26 volumes with any volume 
assignable as a Flex logical drive number. 

The format command isWTNFMT. It too was 
written by R. Zeff and modified by D. Graves. I 
further modified it to work with the WD 1000-05 
controller and true data and replaced the memory 



consuming in-line read and write code with looping 
code. The format command still has the limitation of 
not removing bad sectors, however I found that bad 
sectors were not repeatable. Often a whole Back 
would register bad when sectors were being written 
out during the linking process because the track 
wasn't successfully formatted. Therefore I further 
modified the format command to reformat bad tracks 
until they passed without errors. A drive with a true 
hard error will likely hang the format routine at this 
point If this happens, delete the reformat routine. 

The command called PARK is used to move the 
head to a track number higher than the maximum 
useable track. It is wise to park the head before 
removing motor power so that the head doesn't get 
to come down off of its cushion of air to rest 
someplace important like the directory. It is 
mandatory that you park the drive before moving or 
shipping it. 

The SS-30 host interface card simplifies to the circuit 
of Figure 1 which has only two gate packages and 
an octal bidirectional bus buffer. The Graves/Zeff 
circuit for the SS-50 bus was much more 
complicated. It included I/O address decoding 
which is handled by the motherboard, RAM at 
$E800 for the drivers which is a 2k x 8 static RAM 
in one of the ROM sockets on the SWTP MP-09A 
CPU board, and a memory slowdown not needed by 
the newer WD 1000 05 controller. Figure 2 is a 
suggested wiring layout for the SS-30 host interface 
card. 

The following hardware assumptions are made. The 
WD1 000-05 controller requires eight addresses. 
This means that if you only have four addresses per 
I/O slot, your motherboard decoding must be 
changed. You knew it was time to do this anyway, 
and now you have a good reason to do it. I will 
outline the procedure in the Appendix. Also, 2k of 
RAM is assumed at $E800 for the drivers. This 
requires that the I/O address range must be more 
fully decoded. 1 will deal with this in the Appendix 
also. For the Scudiere virtual disk, all system 
memory must be extended addressed and fully 
decoded so that one memory board doesn't appear to 
be at more than one address. The baud rate lines of 
the SS-50 bus become address select lines SO 
through S3 and must be separated from the baud rate 
lines of the SS-30 bus. The baud rate generator is 
then moved to the SS-30 bus. I will describe these 
changes in the Appendix. In my system, the baud 
late generator is on the same card as the Winchester 
host interface. 
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The WD 1000-05 winchesier controller board has the 
same format as the five and one-quarter inch 
Winchester drive and has mounting holes which 
allow it to be installed with standoffs onto the 
Winchester drive. In this position, the connectors of 
the drive and the controller match up so that they 
connect easily with short ribbon cables. This 
arrangement is shown in Figure 3. The controller 
board uses dual rows of pins on 0.1 inch centers for 
interconnection while the drive uses card edge 
connectors. Mating ribbon cables are easily made 
using readily available connectors. 

The Winchester drive uses the same four pin power 
connector with the same voltages that is used on 
floppy drives. The WD1000-05 controller also uses 
this same power connector, but requires only +5 
volts. A hefty power supply is recommended, 
especially for the older drives which draw a lot of 
motor current from the +12 volt supply. An 
inexpensive choice is the switching power supply 
advertised widely by B.G. Micro. {See 
DATA-COMP advertising - this issue -for excellent 
low cost power supplies for this project) I have not 
installed my drive/controller/power supply into a 
nice case. That is partly how I kept the cost below 
$300. 

The performance improvement of the 
Winchester over floppy disk drives is 
amazing. In fact, the Winchester takes only 
half again as long as the virtual disk to 
perform a comparable task. 



APPENDI 

Motherboard Modifications 

This section will describe the following 
modifications. 

1. 16 addresses per I/O slot 

2. Fully decode I/O address range 

3. Cut baud rate lines 

4 . SS-30 baud rate generator board 

16 addresses per I/O slot 

The early SWTP motherboards are readily converted 
from four addresses per I/O slot to sixteen addresses 
per I/O slot by performing the following changes 
shown in Figure 4. Connect address lines A2 and 
A3 from the 50 pin bus to the user defined lines 
UD3 and UD4 on the 30 pin bus. Be sure to remove 
any jumper to UD3 which was required by the 



floppy disk controller for drive selection. 

Pins 1,2, and 3 of IC3 on the motherboard originally 
go to address lines A2, A3, and A4. Cut these three 
lines and wire them to A4, A5, and A6 respectively. 

After converting to 1 6 addresses per slot, your 
system serial port is moved from slot 1 to slot 0. No 
other change is needed in hardware decoding or 
software driver since the port address of SE004 has 
been moved to slot zero and the incomplete decoding 
of the original 4 address serial board will cause the 
board to be addressed at $E000, $E004, $E008, as 
well as SEOOC. 

The floppy disk controller board is moved to slot 1 
so that it can be addressed from SE014 to SE01B as 
previously. My floppy controller is jumper 
selectable for 4 or 16 addresses. Additional 
decoding will be needed on an older floppy 
controller board if it is not compatible with 16 
addresses per slot. An example which shows the 
modification for the DC-2 floppy controller is shown 
in Figure 5. 

I/O hardware plugged into other SS-30 slots is now 
found at new addresses, so that software drivers for 
this hardware must be rewritten. For example, a 
printer driver which accessed the A side of a PIA at 
SE01C.D to run a parallel printer must be 
reassembled to look for the PIA at SE07C.D if the 
interface is to remain in slot 7. Other drivers which 
would require address changes are modem programs 
or serial printer drivers which refer to an additional 
serial port, EPROM programer drivers, and 
calender/clock board drivers. Some software is 
adjusted by simply using SBOX. Most driver 
source listings have a single port address equate 
allowing simple change and reassembly. 



Fully decode I/O addressing range 
Older S W IP rrotherboards have incomplete I/O 
decoding which allows the I/O addressing range to 
extend up into the SE800 area where we want to put 
a RAM on the CPU board. The simplest way to use 
an $E800 RAM is to connect All from the 50 pin 
bus to pin 4 of IC6 as shown in Figure 4. This 
allows motherboard addresses to fold over only 
from SE0O0 to SE7FF. Complete decoding of the 
I/O in the range $E000 to SE07F can be done simply 
with 5 diodes, a resistor, and an unused buffer 
which is part of motherboard IC1 as shown in 
Figure 6. 
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Cut baud rate lines 

Locale and cut the traces beneath the motherboard 
which connect the baud rate lines between the SS-50 
bus and the SS-30 bus. This allows the four highest 
baud rate lines to be used for extended addressing of 
memory boards above 64K. This change is only 
needed if virtual disk (ramdisk) is desired. Baud 
rate signals will have to be supplied from an SS-30 
board. 



SS-30 baud rate generator 

A baud rate generator board for the SS-30 bus is 
readily made by removing the baud rate generator 
chip from the CPU board and installing it on a 
prototype board. A typical circuit is shown in 
Figure 7 , Note that you can redefine the baud rate 
lines as you wish. 

EOF 



Editor's Note: The above article and following 
source listings, due to their size, are available 
on READER SERVICE DISK 030. 
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Rgure 2 - SS-30 Host Interface Layout 
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Figure 5 - Floppy Controller Decoding for 16 
addresses per slot 
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Figure 4 - Convert MP-B2 Motherboard to 16 
Addresses per slot 
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Figure 7 - Baud Rale Generator for SS30 Bus 
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Figure 6 - Complete Decoding of MP-B2 
Motherboard 
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The Macintosh* Section 
Reserved as a 



A place for your thoughts 



Mac- Watch 



HD BACKUP & 



We have recently gone to a TOPS™ The 
Office Print Shop™ publishing system for our 
text preparation.TOPS is a CPI developed system 
composed of various Apple devices, including the 
Macintosh and LaserWriter, as well as assorted 
specialized software. One of which was 
developed by Great Plains and should be a real 
winner in the DeskTop Publishing industry (no 
charge, Roger or Stan). 

Articles prepared for 68 Micro Journal are done 
on a FLEX, OS-9 or TOPS system. For those 
articles written on an OS-9 system we convert 
them to a FLEX text ASCII only file with the OF 
program from 5.£. Media. Of course, the FLEX 
text files need no conversion, and hopefully they 
do not contain any formatting with spaces, etc. 

We have our systems all connected on a port 
network. So, it is a simple operation to transfer 
the text file from the FLEX system to the TOPS 
system. Once downloaded to the TOPS system, it 
is edited and printed as any other TOPS or Apple 
Macintosh file. 

The TOPS system uses a hard disk to store our 
files. So naturally, it is important to us that those 
files (which have been edited to the final print 
status) not be lost. The bit-gobbler can really ruin 
your day. 

For the first several months we had no hard 
disk backup facilities. Also the hard disk is 
partitioned into a hiearchial file system, making 
the location of files imbedded deep into a stack of 
directories (folders) a real time consuming chore. 
That is until we received HD Back-up & HFS 
Locator Plus, from PBI Software. 



LOCATOR 



A Review 



Divrw 



HD Backup- 

HD Backup is a utility that does just what it 
says, and more, it backs up your hard disk to 
diskettes, by several catagories. 

1. Back Up All Files 

2. Backup Changed Files 

3. Restore All Files to the HD 

4. Restore a Single File to the HD 

Using 800K disks it requires about 3 minutes, 

including verification of the disk (it will init the 

disk if necessary), to fill the disk. It should be 

noted that the program will split long files across 

two disks, so a minimal amout of disk space is 

wasted. 

As the disks are filled a special and invisible 
file is written to each disk, containing all the 
linkage information to allow the restoring of the 
entire disk or selected files. Files saved can be 
listed to windows and copied back to the HD as 
required. Or the hard disk can be reformatted and 
the entire set of files reinstalled. 
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After a master set of backup disks are prepared, 
additional incremental backups can be done on a 
daily basis, or whenever. The incremental disks 
contain the programs that are time-stamped since 
the last global backup. This insures complete 
program protection, unless, of course, you don't 
make incremental backups on a timely basis. Your 
choice. 

Believe it or not, but the very day we received 
these programs for review, our lights flickered as 
the disk was in a write mode and, right, it. went 
belly up. That was less than 30 minutes after we 
had tried out the back up program for the first 
time. Honest injun! Needless to say, we can really 
endorse this product. IT WORKS! We have not 
had a ciash since and had never had one before. 

If you are using a hard disk on your Mac and 
especially if it is the Apple hard disk, you need 
this program. One flicker and it is paidfor-many 
times over! 

HFS Locator Plus- 

This program is one that Apple should have 
included with their latest scheme of hierarchial 
files (HD Backup should have been included also 
as Apple furnished no backup facalities at all with 
their hard disk system). The Locator is installed as 
a DA (desk accessory) and as any other DA can be 
invoked at any rime, from most any program. 

First, the locator part of the program. If you are 
in say, Word, then ask it to locate a document, it 
will search first only for Word documents. From 
the Finder it searches for all files. However, from 
an application, such as Word or MacWrite, you 
can select all types, as if in the finder, by option. 

Searching for a file by whole or partial name on 
our hard disk, which has over 800 files and uses 
about 14 Mbytes of disk space, takes less than a 
minute. 

Files searched for may have several operations 
performed on them, once located. They may be 
deleted, moved, renamed, launched or have 
information about them shown. 

Search selections can also be searched for with 
several wild-card options. A ? stands for any 
single missing character, a * stands for any 
number of missing characters. 

Dates - is another search option. Either created 
or modified dates can be the search object. 
Additional options include searching by dates 
before or after or on a specified date 



The default search is the entire disk, however, 
by button selection any single folder can be 
indicated. Also invisible files are allowed by 
button selection. 

One of the nicer features is the Catalog 
command. By selecting Create Caatalog and 
choosing manual or automatic you write a file to 
disk with a catalog of all files on that disk. 

Automatic allows for the entire disk to be 
cataloged, including all files. 

In manual you are prompted if you desire to 
catalog any particular file. By selection you can 
catalog any range of files (search by selection). 
Because you can use the search feature while 
cataloging your disk you have the option of 
including only certain parts of your disk or the 
entire disk. Files cataloged can be renamed, 
deleted or moved before going to find next. 

The HFS Locator Plus has several other nice 
(read: valuable) features. 

Daily backups are a snap with this program. All 
you need do is open the Locator DA. find files by 
date, check files created on or after a certain date. 
As each files is found it can be copied onto a 
blank disk. Simple, daily backups. 

Also, if while in one application you need to do 
something in another application, activate Locator, 
select the application you need and click on 
launch. Then when you Quit your present 
application, you are launched directly into the 
application selected. Painless switching, as the 
book says. 

Needless to say, we think both programs are 
top drawer! 

Both HDBackup and HFS Locator Plus can be 
purchased from most all major software houses 
dealing in Macintosh software, or you can contact 
PBI direct. 

PBI Software 

1111 Triton Drive 

Foster City, CA 94404 

415 349-8765 



Price: HDBackup 

HFS Locator Plus 

EOF 



$49.95 
$34.95 
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contributed? 



TEC 

MCPM-1 Microcomputer Development Syster 



FEATURES 

QEveiything required to use your IBM PC/XT/ATor Irue 
compatibleMS-DOScornpuieriodevelopappllcaticna 
based on the Motorola MC86705XX series single chip 
microcomputers. 

□ Support* 8S70SP3. PS. U3. US. R3, RS processors. 

BCrOBs Assembler Software 

B Simulator/Debugger Software. 

QMC6670SXX Programming Circuit Board 

B Programming Board Driver Software. 

*S1m Month parts L labor warranty. 

• Tan day rlak frea trial o<fsr. 

*Tha croaa aaeamblar L emulator also 
currently aupport tha MC146a7B3F2tG2 
CM08 procaaaora. A programming board 
for tha F2Sr02 Hill be avallabla 8/1/Si. 

THE CROSS ASSEMBLER PROGRAM TASMOS 

Written in the C programming language. TASMOS aecepla 
as in put standard teat sourc e code tiles and creates outou t 
obteci code tiles in either Motorola Srecord or Intel HEX 
lormal and text listing tiles. It supports the standard 6805 
instruction set mnemonics and has a rich va i Iely ol pseudo- 
operation s that allow tho user to lormat output, control the 
output generated. Include other source Hies In the assembly, 
define symbolic constants and more Extensive error check- 
ing and descnptive error messages are generated to pre- 
vent errors from besom ing bugs. A comprehensive reference 
manual is provided with the TASMOS program. 

THE SIMUl ATOrVOEBUGGER PROGRAM TSIMOS 

Written in the C prog ramming language TSIMOS allows the 
user to simulate and verify the logic of the program in a 
clash tree environment before the program is burned into 
theeprom oltheterget microcomputer TSIMQfi providesa 
full screen display of the microcomputers' memory, regis- 
lers and I/O porta. The user can single step the program 
and view the results as each instruction is executed, or the 
program can be run until the program counter reachea a 
user specified value. The user can atop the program at any 
pointand modify Ihevatuescontalned in memoiy. registers, 
flags, or I/O ports. A "soflkey" operator inleilace methodol- 
ogy uaing the PCs I unci ion keys, ts employed by TSIMOS 
so that the user does not have to memorize program com- 
mands. TSIM05 accepts as input object code tiles in either 
Motorola S-record or Intel HEX lormal 



The Motorola 68HC 11 

An Easy to Use 

Computer-on-a-chip 

Ron Utilise.* 
Department of Chemistry 
Ohio University 
Athens, OH <i370] 
17 October B6 

Motorola has recently introduced a new 
Microprocessing unit (HPU) with a set of features 
wfiich makes it ideal for laboratory interfacing. The 
HC68HC1! is a single chip high spaed CMOS computer 
"hose instruction sat is a super set of the 6801/6609 
series. Its wide array of on-chip peripherals includes 
S serial ports, an B channel B-bit analog-to-digital 
converter (ADC), 3 B-oit digital 1/0 ports, 8K bytes 
of ROM, 312 bytes of EEPROH, and 236 bytes of static 
RAN. And all this on a chip which is only 1 inch 
square! To make the MC68HC11 even more attractivei it 
Is available on an evaluation board (EVBI with 8K of 
RAM and a ROM monitor for *I68. Three comprehensive 
manuals are also provided which describe the operation 
of the HPU and the evaluation board as well as a 
complete listing of the monitor. Also available free 
courtesy of Motorola l* the source code for a public 
domain cross assembler (written in Ci and a public 
domain BASIC interpretator . An EPROn with Forth is 
available from NM1 Inc. (Grand Prairie, TXI for SIS. 

The EVB is conitructed on a Vx6" printed 
circuit board with two 0B25 connectors on one end and 
a 30 pin I/O connector on the other. It even has 

Continued on next page 



THE PROGRAMMING CIRCUIT BOARD 

A microcomputer controls all board luncllona The board 
has two Texlool ZlF programming sockets, S atalua and 
mode indicators, one RS-232 port and one 26 pin JEDEC 
memoiy socket for 6k ol ram or eprom. An eprom program- 
mer allows for production programming without a heel com- 
puter The bo ardcomes wilhSkolram lor quickturn-around 
developmenlcy c les A UL Haled wall mounted plug in (rana 
lormer supplies all power to the board. 



THE BOARD DRIVER SOFTWARE TMCPM1 

TMCPMt software allows the user to control the board 
from within a menu driven environment. Oblect code (ilea 
can be downloaded to the board ram oreprom. The board 
memoiy can be examined and printed Self testa ol the 
bnanj can be initialed and more 



SYSTEM REQUIREMENTS 

IBM PC/XT/AT running PC-DOS Version 2.1 or higher or 
true compatible MS DOS machine with 128k ram, one SV." 
■loppy disk dime, one serial port and one parallel printer 
adapter 



PRICE LIST 

Complete ayatem (Includes all below) $493 

Programming Board with Driver S/W . 1349 

Cross Assembler Software .*100 

Simulator/Debugger Sollware 1100 

System Relerence Manuals (3) * 20 

Shipping - add SX U.SJ). l> Canada, 

6X surface foreign, 1BX air foreign 
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little rubber feet so that you can use on a tabletop 
Hith out worrying about scarring the solder side of 
the board. To get it going you only need a power 
supply and some kind of terminal with an RS333 port. 
The EVB requires »5 for the computer circuitry and »13 
and -13 for the serial ports. However! 1 found an old 
Coleco Ada* power supply at Radio Shack with *5> -5, 
and *\3 for about five dollars. Using the -S instead 
of the -12 didn't seen to harm any of the circuitry. 
Since the MPU is CMOS 1 also tried using batteries: 3 
1.3 volt "C" alkaline batteries provide 't.S volts if 
wired in series and two nine volt alkaline batteries 
provided * and - voltages for the serial ports. 
Though 1 haven't tested the 9 volt batteries, the "C" 
cells provide about 30 hours of continuous operation. 
(Even after SO hours none of the chips felt warn to 
the touch.) The only indication that the batteries 
were low was that the monitor started to misread 
numbers typed with commands - 

I have used a Tandy 100 and an IBM-PC with a 
terminal emulation program to run the EVB. The 
default baud rate is 9600 baud and there is no 
handshaking so the cable from the terminal to the EVB 
needs oniy three wires: 3,3 and 7. 
SOFTWARE 
The EVB boots directly into the monitor (Bit 
User's Fast Friendly Aid to Logical Operation - 
BUFFALO) which is designed for exploring of the 
workings of the MC68HC 1 1 . The monitor is very easy to 
use and even includes a help command which displays 
all available commands with a brief description of 
syntax for each. All of the typical commands are 
included in the monitor (see Table I). For example 
the memory display command (MD) allows you to look at 
large blocks of memory and the memory modify command 
<HM) allows you to change memory. The call (CALL) 
command is used to execute subroutines in RAM or ROM. 
There is a load command (LOAD) which allows you 
to download assembled programs in Motorola SI format. 
The cross assembler mentioned above produces this 
format so program development simplified. 
Unfortunately the default baud rate delivers 
characters faster than they can be translated and 
stored in memory. Since there is no handshaking the 
downloading computer rapidly outruns the EVB and 
characters are lost. 1 am using Bltcom*- so 1 simply 
added a 100 ms delay between each transmitted 
character. Of course the other alternative is to 
reduce the baud rate. 

The most useful command is the 
assemble/disassemble command (ASM) which allows you to 
write and and debug programs. When invoked the ASM 
command disassembles the op code at a specified 
address. If you type in a mnemonic it will be 
assembled and replace the original memory contents. 
The next memory location is then disassembled. Since 
this command handles only one line at a time, program 
development can be tedious. If your terminal emulator 
has and upload facility you can type the mnemonics 
into a disk file, give the assembler /disassembler the 
first address for the program, and then upload the 
disk file. Again there is a problem because of the 
lack of handshaking but it is not as severe when 
downloading ASCII characters. 

The Monitor has a special transparent mode which 
allows direct connection between its two serial ports. 
This means you can connect two computers/terminals to 
the EVB and allow the* to either talk to the EVB or 
each other without switching cables! If you have a 
modem connected to the terminal/computer this 
transparent mode would allow you to switch back and 
forth between the EVB and the modem. 

The Forth ROM simply replaces the monitor ROM on 
the EVB. It follows the Forth-83 version of the 
language and has several added words to take advantage 
of the on-chip peripherals. Aside from the normal 



description of commands, the manual also has a 
tutorial on Forth and a primer on computers. 

The serial port driver for FORTH does use 
handshaking so there are no downloading problems as in 
the BUFFALO ROM. At «1S this is one of the best 
barglns I have ever bought! 



Because of its versatility the HC68HCI) seems 
very complex at first glance. To begin with, it can 
be configured as four different types of computers 
using the MODA and MODS I/O lines (see Figure 11. In 
the single chip mode (mode 0) It functions as a self- 
contained computer with all of the attributes listed 
in paragraph 1. In the multiplexed mode (mode 1) two 
of the I/O ports are used as multiplexed address and 
data lines which provide access to 64K of external 
address space. Additionally, two special modes art 
available mainly for test purposes but are useful 
since they allow special modification of the MPU. The 
EVB operates in the multiplexed mode but has hardware 
on it which mimics the single chip modes of the I/O 
ports. The BK of RAM on the EVB is included for 
program development. 

By far the most innovative feature of the 
HC6BMC 1 1 is the wide assortment of peripherals which 
are included on-chip. Host unusual among these is the 
ADC which uses all of the pins of port E ( see Figure 
1). The ADC is a succesive approximation converter 
with four sample and hold amplifiers so it actually 
operates as four ADC's. A dedicated register (at 
•1030 on the EVB) is used to control the ADC and 
conversions are stored in the four successive 
locations after the register. The ADC always makes at 
least four conversions to fill these four locations 
but it has several different operating modes. The 
most straightforward is acquiring four consecutive 
readings of a single channel and storing them in the 
four consecutive result registers. Since the ADC 
requires about 16 microseconds per conversion, this 
represents a high speed sampling of the signal on the 
selected channel. If a slow signal is being monitored 
these four readings can be averaged to yield a 10-bit 
result. A second mode is also available in winch the 
ADC samples a selected channel continuously and 
updates the four result registers in a round robin 
fashion. In this mode the most recent four readings 
from the selected channel are always available. 

The ADC can also read groups of four channels: 
either 0-3 or <t-7. Again this can either be a single 
set of readings placed in the four consecutive result 
registers or a continuously updated readings. 

The ADC uses two reference pins, low reference 
Vp,i_ and high reference V*„, to determine the voltage 
range which is scaled into the 00 to FF range. I 
simply connected the V nu to ground and the V m . to the 
♦5 of the MPU so a 5 volt input translates to FF and 
volts to 00. According to the manual you should use a 
less noisy reference to insure the true accuracy of 
the ADC. Vou can also tie Vm. and V«w to a narrower 
range and expand the range of the ADC. Vou could use 
a programmable reference source and modify the ADC 
range under software control! 

The memory available on the MC69MC 1 1 is divided 
into three different types. The BK of ROM contain* 
the BUFFALO monitor but it could contain user written 
software. For example, a new version of the MC6BHCII 
is promised with Forth in ROM. The 513 bytes of 
EEPROM make the MPU adaptable to a wide variety of 
cnviroments. Since this information is not lost on 
power-down and it is easily altered, the personality 
of the MPU can be tailored to individual, even 
changing, enviroments. Finally the 356 bytes of RAM 
is adequate for storing data for calculations and from 
the sensors or short programs. The actual address of 
the RAM (and registers) can be moved to any <iK byte 
boundary using the configuration register. 
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The &BHC1I has a large let of multi-use digital 
1/0 line* (Figure 1) *nd in fact the 8 ADC lines of 
port E can be read as digital input* at any time other 
than when a conversion i* taking place' One dedicated 
output port (8)i one programmable I/O port ( C ) ■ one 
programmable I/O port that It partially dedicated to 
the serial port* <D1> and one nonprogrammable port 
with both input and output line* (Ai are provided. 
All of the port* appear a* register* and four control 
registers are used to configure these ports for data 
direction, handshaking, and edge triggering. 

In addition to normal parallel 1/0 port A has 
special input and output modes called captures and 
compares respectively. An input capture simply latches 
the value of an Internal free-running 16 bit clock 
Mhen a specified transition occurs on a selected input 
pin. The edge polarity can be either high to Ion or 
Iom to high and there are a total of three capture 
registers. Five output compare registers are used to 
do just the opposite. Uhen the clock equals the value 
you have placed in a compare register < an output pin 
(or pins) can toggle (or clear or set). Both captures 
and compares can generate interupts. 

This is kind of confusing isn't it. Suppose you 
wanted to monitor an input line and Mhen it changed 
from low to high you wanted to delay SO microseconds 
and then set an output line. Rather than tying up the 
CPU with this timing problem, you could use captures 
and compares to automatically generate this delay. 
Uhen the input transition occurs the current clock 
value Hill automatically be loaded into the capture 
buffer and generate an interupt. All you have to do 

is take that value, add 30 microseconds and store it 
in the compare register. Noh you can sit back and 
wait for the output signal to be generated 
automatically. You could even monitor three input 
lines and only output if they occur in some predefined 
order or time frame. This type of I/O programming can 
get very complex but the software overhead is minimal 
and the CPU is free to do other things. 

Another useful I/O feature of the HCbBHCll is 
the pulse counter available on port A bit 7. This 
functions in two modesi counting external pulses or 
determining the period of external pulses by counting 
an internal clock. This bit can drive the pulse 
counter even when configured for other types of I/O. 

As if that is not enough ■ there are several 
special features provided. A computer operating 
properly (COP) watchdog can be used to snag run away 
programs. Uhen in use the COP is simply a free 
running down counter which forces a reset if it 
expires. The only way a program can avoid expiration 
is to write two special bytes in proper sequence to a 
specific register which reloads the timer and begins 
the cycle again. Your software must be written to do 
this little chore continually. If a program gets 
stuck in an tnfinate DO loop for instance, the COP 
will eventually time out and force a reset which 
restarts your program from the beginning. This takes 
care of those glitches which periodically creep into 
your program from unexpected places and, in 
combination with the CMOS circuitry, makes this MPU 
especially well suited for noisy enviroments. 

In order to save battery power, special STOP 
and WAIT operands are supplied to put the MPU into low 
power modes. In addition, the ADC can be disarmed 
when not needed by clearing a bit in the option 
register . 

Op codes for an B by B multiply and two 
different 16 by 16 divide instructions make 
sophisticated programming easy even in assembly 
language. The multiply takes about 3 microseconds 
while the divides require 30 microseconds which makes 
complex real-time programming possible. 
APPLICATIONS 

The applications of this EVB and the MC69HCI! 
are unlimited. In the past you had to be very careful 



in selecting a computer system if you wanted to do any 
interfacing and several steps were involved. First 
you had to select a computer system suited to your 
application, i.e. IBM-PC, Apple, Commodore, etc. Then 
you selected an interface board with the necessary 
accouterments - which may cost as much as the computer 
itself. One way to save money is to use a 
"compatible" computer system but then there is usually 
no guarantee that your interface board will work. 

Even if it does work you may find out some subtle 
difference at the most inopportune moments. The 
MC681I solves the problems of expense and 
compatabi 1 i ty because it is a serial rather than 
parallel device. In fact, even a computer whose only 
available Interface is a serial port (i.e. Macintosh) 
can now be connected to the real world and in a 
sophisticated and relatively inexpensive manner. This 
is a real boon for hackers who have been left out of 
the recent developments in personal computers which 
have catered to the word-processing crowd. 

The most obvious application for the MCfcBHCl I 
is in robotics for which it was obviously designed. 
It can sense 8 different transducers and control a 
host of motors and whistles and bells. The ability to 
use batteries means the the robot would be free to 
wander about without a tacky cable and the 
availability of a high-level language like Forth 
greatly accelerates the programming. 

The low price for the MPU and its complete set 
of peripherals will make it attractive to anyone 
interested in learning about computer interfacing. 
Researchers and educators who have stayed out of 
interfacing because of its expense and complexity will 
have lost all of the former impediment and most of the 
latter. 

The MCA8HC 1 1 could make an excellent 
"watchdog" for monitoring other computer systems. The 
main problem with remote troubleshooting at present is 
that the computer must be working in order for it to 
be fixed. The remote repairman cannot access it 
otherwise. Since the MC6enCii is a completely self- 
contained, battery operated computer system with 
serial port, It could be built into another computer 
to monitor the power supplies, disk speed and timing, 
etc. Uhen the system went down, the remote repairman 
could dial up the 6BMCII through a modem, check out 
the subsystems of the main computer, and, hopefully, 
diagnose the problem. 

In order to provide some semblance of 
objectivity, it is customary for a reviewer to list as 
many "problems" as possible about the product he is 
reviewing. This is extermely difficult with the 
MC6BHC11. The only hardware missing is a digital-to- 
analog converter but since these are available for 
about sS, this is not a serious critlsm. The 
combination of hardware arid software which Motorola 
has put together for this MPU deserves high praise. I 
hope more companies follow Motorola's lead. 
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Wayne K. same 11 
3425 Cebon Dr. 1525 
San Diego, CA. 92122 

68 MICRO JOURNAL 
5988 Cassandra Smith 
PO Box 849 
Kixson, TN. 37343 

Daaz Ed i tor , 

I would first like to express my appreciation (or your 
fine magazine. It is constantly uplifting my 
expectations of m y 6809 Dragon 64 computer. Your staff 
provides informative and original material for these 
systems, and deserves ■ lot a credit for Keeping in- 
the-know. Keep up the excellent work! 

Secondly, I would like to call attention to a company 
in the U.K., COMPUSENSE LTD., who has kept the Dragon 
ccmpjter alive. They have provided a hardware/software 
base that is strong and efficient. They have 
implemented ■ FLEX version for the Dragon, and continue 
to support OS-9. They have been a constant source of 
information concerning the Dragon, and are constantly 
developing or modifying existing software to run on 
this great little machine. Their FLEX implementation 
is complete, providing a software base that is 
accessible here in the U.S., which is much needed. In 
fact, my first copy of the FLEX system wouldn't boot, 
t sent it back to them with a letter of explanation, 
and they sent me a new copy - PRONTO! I can really 
appreciate this type of professional attitude towards 
customers, even if they are 3800 miles away. 

Thank you for giving the 68 XXX tne kind of support that 
is especially due such a powerful series of devices. 
Bravo to yonr staff, and to yourself! 

Wayne K. Schnell 



tdiior's Vfpte: Thank} "Wayne, for tht kjnd words. Wt. oS. of us, 
staff and contiibutois natty do try. I guess we art erne of tht Cast of 
the contributor driven computer magazines. And it is only by the 
cooperative spiiit of ait you readers thai makts us possible! We by 
Hard. tspeciaMy in tfu.se limes, and nice Utters, iiks yours, makts our 
day! 

"We art vied aware of the tKfttitnt version of JLTX from 
COMmtSEtyE LTD.. tht S.%. •Media version of fUEXjor the 
CoCo is from tht same fine folk/. Our 7ULX COBOL is from thtm 
also. Ted and his crew havt certainly given swell support to tht 
ZWAQOTiC bunch! I get information, from time to time, concerning 
the iy^\(jO0i_ in 'Europe, It has a very targe Base of serious users 
over there. And apparently some ova here, likt yourself. It Has some 
nice features not available on ourTandy CoCo's. 

A lot of our CoCo readers would certainly GUt to read afoul your 
IWJAQCnl. It never made it hen. I thought Tano had it set up for 
tht USA market, tut then they just sorta drifted out of the picture. 

}(ow about some input on your TfKJMjOX, Compared say to tht 
CoCo- Might even make you world famous. Tor sun it wit get your 
subscription extended. Can't see how a fella can turn down a hot 
offer likt that! 

•WW 



PORTLAND, OREGON, USA: 

LLOYD I/O, INC., announced today the release of 
VANTAGE™, a co-resident: 

editorl cross-assembler I symbolic- debugger 

package for 8 bit microprocessors to be used on OS9/68K 
computers. The retail price of the package is $795. 

VANTAGE is for users needing to edit, assemble, and lest 
their software in a single programming session. 

The package consists of: CRACKER™, a Cross 
Symbolic Debugger/Simulator for 8 bit microprocessors; 
CRASMB™, a Macro Cross Assembler for many of the most 
popular 8 bit microprocessors; ED™, a Programmer's Editor 
that acts as the host to the cross-assembler and debugger 
programs. 

CRACKER will allow the user to debug and emulate all the 
Motorola 8 bit CPU's, including the 6809. 6800, 6801, 
6303. 6804, 6805, 6808, and the 6811. The Intel CPU's, 
i.e. the 8048 family, 8051 family, the 8080-8085 family, 
the Zilog Z8 and Z80. the 6502. the TMS7000 and the 
CDP1802-5 will be finished wilhin a few weeks. CRACKER 
includes a single line assembler: a disassembler; a software 
emulator; cycle counters; simple to vei-y complex 
breakpoints with symbolic, register, and memory values; 
address traps; and symbol/label linkage; source code 
debugging; plus many other powerful commands. Updates 
will be free for a one year period, and then updates will be 
charged a nominal fee. Retail price: S495. 

CRASMB has been available since the 3rd quarter of 1985 
and it supports 15 of the most popular 8 bit microprocessors 
as mentioned above. CRASMB supports the manufacture's 
mnemonics, addressing modes, and expressions. Customers 
already using CRASMB (OS9/68K)*will need a new version if 
the symbolic debugging features are to be used. Updates: no 
charge to previous customers if purchasing CRACKER with 
the original CRASMB disks sent in for proof-of-purchase. 
Retail price: S432. 

The ED editor is a also a newly released product, written 
especially for use with this package. Both a line editor 
(similar to TSC's FLEX line editor) and a full-screen editor 
are available. A one lime interactive procedure is used to 
configure the editor to your terminal. Both BINARY (such as 
a Televideo 925) and ANSI terminals are supported. Retail 
price: S63 for the line editor version and $249 for the 
full -screen version, however, it is included free with 
VANTAGE as desciibed above. 

Contact your local distributor, dealer, S.E. 
MEDIA (catalog this Issue) or Frank Hoffman at 
LLOYD I/O, INC. (advertising this Issue), 

P.O.Boi 30945, Portland, OR, 97230 (503) 
666-1097, for more Information. 

VANTAGE, CRACKER, CRASMB, and ED arc trad emarta 
of LLOYD I/O. INC. OS9 is a trademark of Microware 
Systems Corporation. FLEX is a trademark of Technical 
Systems Corporation. 
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3J1S31VNN AVENUE. 
ABBOTSFORD, 
BRITISH COLUMBIA, 
CANADA. VZS IE2 



Deer Don, 

For • while I «■• wooderioR whit By aubject of 
ducunioo waa goiog to be, but • frieod aettled cbe 
poiot for >e wheo he experieoced difficulties io 
Manipulating logic operator*. XBASIC baa 3 three of 
then - AND, 01 and NOT - which cooatitute a logically 
cosplete act, in that any logical atateaent cao be 
expreaaed with then. In actual fact, though, becauae 
AND and OK are logically complfapn tary , the act cao be 
reduced to 2 o per atora. by uaing AND to repreaent 01, 
or, of count, 01 to repreaeot AND. Here the bar over 
AND or 01 ia read aa 'NOT' - thua NOT AND or SOT OR. 
leaden already veraed io the mathemat ica of digital 
logic will racogoiae NOT-AND aa HARD, and NOT-OS aa 
NOR, and alao be aware that •■• of theae operatora 
alooe ia capable of expreaaiog any Eooleao logic 
function. However, let'a take tbioga ooe atep at a 
tiae, and for the aomeoc get back to our baaic AND, OK 
and MOT I For the beoefit of readera oev to the game, 
perbapa I abould aantioo that Boolean algebra ia named 
after ooe Ceorge Boole, who ia credited with being the 
firat person to develop a truly cooaiateot tecboique 
for aanipulatiog Eogl iab-laoguage aenteocea in a 
mathematical for*. 

To begin with, I'll reproduce tbe eaaence of ay 
friend'a problem, and we'll juet take it from there. 
Conaider tbe following : 

10 IMFUT "Do you need ioatructiooa <T or N)",QS 

20 IF Q$-"N" 01 QS-"n" GOTO SO 

30 IF QSO"Y" OE QSO"y" COTO 10 

40 tltC, "LIST GAME. INF" 

SO reat of program .... 

Uia inteotioo ia quite clear, oamely that a reapooae 
of 'N' (upper or lower-caae) ahould bypaaa the LIBTing 
of ioatructiooa. Thia laavea ooly *Y" or "y H aa ao 
alternativa acceptable reapooae. For all other 
reaponaea the prograa ahould loop back aod repeat the 
requeat for input, otberwiae it abould fall through 
and LIST tbe inatructiona at Line 40 aod then carry oo 
with the reat of tbe prograa. 

To bia aurpriae, be found that a negative reaponae 
worked OK, branching bia to Lioe SO, aa did ao iovalid 
antry, wbicb correctly returned bia to Lioe 10. Bat, 
and a big but it waa, a reapooae of T" or "y" alao 
behaved aa an iovalid raaponae aod bounced bin back to 
Line 10 1 I I recall baviog aeea aiailar puzzliog 
occurreocea witb other people, as perhapa aoae 
eaplaoatiooa are io ordei. 

OK then, let'a begin by pointing out that AND ia 
mathecat ical ly equivalent to '*' (multiply) and OR to 
*•' (add), although Boolean logic eapreaaiona uaually 
uae '.' fnr AND, or omit it altogether. Thia is alao 
true of normal algebraic operationa, where e*b*c ia 
written a* abc, or 2*x aa 2a. A further point to keep 
in aiod ia that, ju«t as in ordinary arithmetic, 
'multiply' haa priority over 'add'. Thua 2*3*4 is arnt 
• imply eaecuted from left to right to form 5*4 and 
theoce 20 - - the part 3*4 aatt be executed firat, 
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producing 2*12 and thence 14 aa the correct reault. 
Another way of looking at tbia ia to imagine a aet of 
parena around the bigh-priori ty part, tbua 2*(3*4). 
Obvioualy, if we wiahad the "'♦' to be executed firat 
we would write our expreaaion aa (2»3)*4, aa parena 
have a priority even higher than that of '*'. 

So too with AND and OR. The eapreaaion A AND B OR C 
ia expreaaed in Boolean algebra aa AB * C, which ia 
•.■ice different from A(B>C). Let'a conaider AB ♦ C a 
little f urther . perhapa bow to expreaa ita ioverae, 
that ia AB ♦ C. Thia ia performed by 'compleoeot iog' 
(pleaae, mot 'complimenting' aa occura all too often) 
everything under the NOT bar, iaclmaiag tto iaalieJ 
AIB kctweea A «a« Bl _I t ai&ht acra that the reault 
ahould be A OR B AND C, or A ♦ EC in mathematical 
form, but thia ia not ao, aa we would be overlooking 
tbe fact that AB form a 'tied' pair (remember the 
imaginary parena arouod them, aa in our eaaaple 
2*3*4), and aait retain that rtUtiooibip iii tbe 
transformed expreaaion. Tbua (A OR B) AND C, or 
(A+B)C ia tbe correct anawer. 



One anall final ate 
re-eaaaine the 1 it t 
fact that XBASIC ( 
choaen the va lue 
algebra uaea the v 
agreed on '0* to r 
to our initial pro 
the expreaaion AB 
FALSE and C TRUE - 
evaluate aa TRUE or 
to decide by aerel 
with their correap 
become* 1.0 ♦ 1 , 
finally 1(0*1- 
algebra to remember, 



p, and we are ready to go back aod 
le prograa above. In spite of the 
aod aeveral other BASICa too) have 
' -\' to repreaent TR0E, Booleao 
a lue '1'. Everyone aeeea to have 
epreaent FALSE. Before going back 
blem, let'a take one laat look at 
* C. Suppoae A were TRUE, B were 
- would the complete eapreaaioo 
FALSE? Tbia now become* war* eaay 
y replaciog the individual term* 
onding TROTH valuea. So AB ♦ C 
educing to ♦ 1 (1*0-0) and 
1). One more feature of Boolean 
and that ia that 1*1-1. 



1 won't go into the reaaooa for that right here, but 
aaybe our readera would like a courae oo the aubject 
of Boolean algebra and bow to deaigo digital logic 
circuita. Teara ago, when 1 waa a Syateaa Deaign 
engineer at Square D Coapany in Toronto I conducted a 
2S-week in-plant seoiosr on tbia very aubject every 
fall and winter, and evolved an efficient ayetea of 
designing such circuita uaing ••cisaal ounbera. 

If readera would be intereated in auch a courae, 
pleaae write to Don and let him koov. If be get* at 
least 20 respooses, and provided auch a courae falls 
witbio the policy guidelines of 68MJ aaybe he'll give 
ae the go-ahead! f It'a not aa difficult aa it aounda, 
believe ae. I'll outline atraigbtf orvard techniquea 
for cooverting an initial aet of writteo or verbal 
apec if icat iona into a aet of decimal ouabera, wbich 
will be meoipulated according to certain ivies, at 
wbicb point the circuit will already have been 
deaigned. The fioal atep ia to tranalate the 
reaultant deciaal numbers into an actual circuit 
diagram, uaing one technique if relays are to be uaed, 
aootber for NOR uoita, another for HAND, and ao on. 
Intereated TT 
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Mow to gee back oo line oocc Wrt. Fine, let'a uae 
our new knowledge to check out Lioe 20 of our little 
program. If we aaaume a reapooae of *N' then 'QS«"N"' 
would be TRDE aod 'QS-"n'" would have to be FALSE. 
Thua the complete logic expreaaioo becooea TRUE OR 
FALSE, that ia 1 ♦ 0, which evaluatea to 1 (TRUE), aod 
ao the prograo would branch to Lioe 50. The cooverae, 
ie ao entry of "o", producea ♦ 1 • 1, which would 
alao cauae a branch to Lioe SO. 

How about Lioe 30? Suppoae ao entry of "Y" occurred. 
Why doea tbe progran oot fall through to lioe 40 aod 
produce a LISTiog of the instructions? Let'a exaoine 
it aod fiod out I Ao eotry of "Y" aakea 'QSO"Y'" 
FALSE, aod 'QS<>"y'" TRUE, thua the complete 
expreaaioo equatea to 'FALSE OR TRUE", or t 1 - 1. 
Aa the whole ia TRUE the ioatructioo to GOTO 10 would 
be carried out. If "y" were eotered we would have the 
logic equation 1 « - 1 , aod if it were aooe other 
eotry auch aa "X", we would have 1 ♦ 1 • 1. Thua, aoy 
reapooae, other thao "N" or "n", reaulta in a return 
to Lioe 10. Problem oow ia, how ahoald Lioe 30 be 
written?? 

Let'a take another look at tbe intent of Lioe 30, aod 
thia would be a good policy to adopt wherever 
'negative*' are involved, aod I claaaify '<>' aa a 
oegative (aa it iovolvea the uae of the word NOT). 
What waa ioteoded was that if Q*""Y" OR QS-"y" then 
Line 40 should be executed, otherwiae back to Lioe 10, 
ie back to lioe 10 if N0T(QS-"Y" OR Q$-"y"). lo 
mathematical terma thia neana complementing the atuff 
inaide the parena, to produce QSO"Y" AJD QSO"y" 
('<>' being the coopleaeot of '-"■ aod 'AND' the 
complement of 'OR'). Lioe 30 ahould therefore have 
read : 



30 IF Q$<>"Y" 



Q$<>"y" C0T0 10 



Now ao eotry of "Y" producea the Boolean algebra 
equivalent 0*1*0, and an entry of "y" the Boolean 
equivalent 1*0-0. Both evaluate to FALSE aod 
would cauae a fall-through to Lioe 40, the deaired 
reapooae. Oo the other band, ao eotry of aay 'X' 
would produce 1*1-1, evaluating to TRUE aod 
cauaiog a branch back to Lioe 10. Note that I have 
here used the aynbol '"' to repreaeot 'AND' ■ imply to 
make my meaning clearer. 

I hope thia little diacuaaioo haa helped make it 
eaaier to figure out which way your program ia goiog 
to respond to logic expreaaiooa, without having to 
test out all combinations in actual teat RUNa of your 
prograo. 

Io closing, I would like to update readera on the 
progress of my RBASIC. Currently, 1 have improved the 
EDIT command slightly, added XOR (exc luaive-OR) to the 
list of logic operatora, added ao APPEND command to 
allow appending an additional file to the prograo in 
memory, aod expaoded LIST to allow, let'a aay, LIST 
70,100-200,3)0 ... etc. Next to be added ia 'DELETE' 
to allow a cosmaod auch aa DELETE 100-200 to delete 
the oaned block of lioea (with embedded precautiooa to 
protect the User) . 

For the next month or so I shall take time out to 
cooceotrate on writing an Instruction Manual for ay 
RBASIC, which ahould give you all a little tioe to 
write to Doo about my propoaed courae io Digital 
Logic. See you all later. 

Siocerely, 



u 



R. Jooea 

Preaident 



Note to Doo ; 

Dear Doo, 

Over the oext few weeka I ahall complete my composite 
of thia aeriea oo I BASIC, with auitable additiona to 
fill up the disk, at which tiae 1 ahall aubait the 
whole worka to you for the beoefit of our reader- 
f rieoda. 

Net Peter Stark aod family a few weeka ago. They were 
out here visiting our EXPO 86 exhibition, and caaped 
overoight io our driveway io their aotor-hoae. We had 
a long discussion, as did hia wife Loia witb ay wife 
Joan. A wwrf nice tastily! 






mmwm khill!^ 



Contact, Ian Kaplan 
1415)224-1*79 



<-ZM TABDT CQKPUTO. fEATCUS Q*-« OVDUTIK. ST«TtM 
KM IftttiSDIATt UtSASt 

Dee He 1 nee, IA — Tandy Corporation nee Introduced the new 
Color Computer 3 along with a apeclallted. hlgh-perfornance 
varalon of Mlcrowere'e QS-9 La>*ral Tw© operating lyicu. 



T*ie Color CdaTaputar 3 ocaAlnti aa economical, hlgh- 
parforBBBca eyetea. with as eod-ueer oriented interface. At the 
ftuclaua of the aacblne la aa enhanced verelon of OM-9 Laval Tvo, 
providing upward cn-rpa tlbillty tram tha Color cms*. tar 2 which 
uiti OS-9 Laval On*. OS-9 la a reel-tine, e*jltl-ueer, eultl- 
taaklog operating eyetv* that la compact, eOHable and provldaa a 
ONII-etyle application* envlrooawDt. The Color Ccaeputer varalon 
of OS-9 Level Two lncludeai a ault l-ecreea, ■ultl-vIcxJo** 
environment that allowa aavaral programa to run t)Bj ltaneou aly 
within different window . It ilu Ineludea o*tr 50 utility 
coemwind programa for eyatem end dial. file control. OS-9 la 
available fro* Tandy for both 1281 and 3121 varelona of tha Color 
Computer 1. 

■ultl-Vlev la aa enhanced windowing environment daalgnad 
• pacific. lly for tha Color Cf-rtpvjtar 1. It glvee a common, 
graphlca baaed* uaar-f r lasdly environment for application 
prOOraaa to run under. It conalete of eyateae ■upport for title 
bare, nenu bera, pull down aanui and dialog boxee, Tha graphlca 
ahall allove the unr, with the aid of a mouee, to aelect picture 
oriented commende to procaaa program* and create vlndove. 
Standard <**•■ top utllltlea locludet Calculator, Calendar fOwiakO 
took. Alai* Clock. Printer Co* figuration, Sal p. Control Panel and 
Cllpboefdlng Support. 

Tha Color ftrntputer ]'■ varalon of Color BASIC, compatible 
with prevloua M* extended Color SAS1C h*e bean enhanced by 
nicrowara for greater control Of iti new power end capebll ltlee. 
Commende added to tbe eyatmu allow acceee to all 5121 of memory 
end hl-ramalut ion grepMca. SI- n«4lut Ion teat and graphlca 
ecrccna are outalda the SAS1C workepe-ca and do not uae up program 
memory apace. 
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not takdy cxmrura riKrmzs o*-» ovaxritta strsroi 

A Development Pah, deelgned Co provide advsncsd utilities 
Cor program development, tut bees elm*l taneoaaly released by 
Tandy, rtaturti of tha Oovel cp ment Pah Include: a relocatable 
■aero assembler and linker, hard dlak driver. AMI die* driver, 
daacrlptora, system programmer utllltlae, programming support Cor 
utilising tha window anvlronaeat, plua a screen editor, 

OS- haa long since been oonaldared the defscto acandard 
operating eyatee Cor 680* bsesd computer ayatem*. and la now 
•merging all en laportent Indaetry etenderd For Motorola 
■ Icroproceaaor Used aichtnM. Earlier this year ».V. Philips 
end Sony announced 09*9 will be the beala Cor the Compact Dlac - 
Interactive (CD-I) etenderd. In July, Thomson. Olivetti end 
Acorn al9nad an e9raea>ent to cooperate In tha development of e 
European Education standard Cor It bit elcroc-aspu tara 
Incorporating Ofl-9. 08-9 bee beea licensed to over .SO 
msnufeeturera Cor uaa In a wide verlety of Industrial, eclentlflc 
end coneumer products. 

rounded In 1*77. Nlctowere npeclelliee If* the development oC 
advanced ofliai family operating systems snd progressing 
languages. Nlcrowsre oCCLcea srs located In Den Moines, Iowa and 
Tokyo, jspen with field representative worldwide. 




(M) MOTOROLA 

Serr^orejucio' "VocAicej tnc 

REAL TISK OPt RATTUG STSTIM FULL* StSWOetTS aa-QO CHS" «T 
•NO UDTDMOC* VHC eOaAO FmmaLT 




is' are r nappy aawi. wwsywsae cms* k> 1TJ wsym a 

exi S/maiwyj ume to «0 MOyM asmo-r 



T ne VIP. iAdo* k«cnet ■ 



FUTUKuSOWTHMeUMS 



nm awxyporvw e« lamer kw i i res of ew yMrjJn ova mswy use of aw rersAoa 
OSass^e»ert'S»Bws»pewlot **Ju mi'v^u riwni1 eniw^taMia~QawWJ.c*e r iii' e sei ssvcaonve 
WCUaltof UanuWQasm auusramT** r-eksz* rust") factory twavoA nhjilaaaa ai pm wwf ayrn mars 
hwn ttuftsub rreea okmmavtae are pawned to, sveaaeitwy m vsa iae7 

IteTsal P*C*AO£ Op-nON 

Ttw vetSAaoa 4 k OS s ano ■ aei r an <nav-WS «*e ■ e 
OKS^tnrnvnaivWsf-mTfiltll'VVI The U 
rmrWjf-us>ceuCaa£rxjC-f>lp<ai_^r*ui«*r>^cy'Vv^«oma) cacne "wren ? Isnyns of wuvSB 
OSUwU ■.aSoKoye noon ami 7C -ejvet SAnervetav aiu. and 00 tdbyte ft/aa/MB, tsoevfW, mlmw 
Buss staph) a wrnrt 

« SYS'UlvTir. at apnea 



PWCe AMO A»mU *aUV/TV 

Ttw/v^CaflniOrevemvsSrsTte'»r>wmabeveieyboe^ 

Comet coos namr>«aaKv> aosvartg a iMoatat to. ochfl ape VAtTt pnetno a a -ai n w on reiiam 



leejiHUBirtepors viRSMea nasi T ~~* Muii.taa»«o m*KM* Oeenavo 



uaavhisvnoos vTJt&adoi PMa-T^-e UiAoss'ig vkAKaap 
BLnaoKSapSvee 



CREATED BY 

MacroMind* 



for Moelrito<riS12K 



Ui. t>»ialSaTvwmStaeaiisnmof< , »»a»h( ( ;. Mu«e»rnm ■»! Cv-alari™ (nap-sea by M 
UJ-CiOSk lA.Traoihlilitak-r 6S Man Journal ] a Pahlkxuoo n «ol5lO. 3. Owe of 
("Una; !M141:>,ft -•■■; sf mass; Monday: 3A No. of hwwa PaKeb_£> AmmmOy 13. 
JB Anneal Seras-ksfc-, Pho* taS.JO 4 and i. T\ i i g I a Mallae] Aetmmm of Kuan Oik-. 
H.-l < »«-n.nn^»».>-.D|-a.att.P\iMw»l)flOr a, S rott K4. HiSsnn. 

TN. J7J4J 6 PalNereiind Con-*-. M-. «» A4»— o/Pohlal. r Oo-U M Wllesim Jr. 
S*00 Caauama Smaa Ri, Kuaoa. TN TIM), tutus; OoaaM M. «VUauni Sr, MOO 
C » . a i d r . SmlOt Kd.. Hiuoa. TN T7MJ.. Me-aaau Salkm- Larry B. WiSau-a. S»00 
l~ia-a.it- S<aM> Ka.. HLa.-j.TH 1TV117 Ov« Cotn-ee, Pablmbral ■- — " 
Sreali RA, Hiuox TN S7S4]. eboaa v-etla.ne-. are: Donald M. V. Poo— J. Walauta, 
Lany B.Wullai-a. Hwy B-ioT-aviam, Tbenmi B. WuJts-ei. B. Known Saatsolderi. 

rVfca-»-s«-a. md «t» SMraj Holdan Ow-Jas <s HJdrn^ ) faim. i nfTml InaMS 

of Bank, Monsaa-B o( oOjaa SoevtraK Nona tfa ria-pvskei By N-np-av Otv-oQitKiw 
AaLAialTiilU Al Spsrial R*S»: N(A I* fllail I SI I Pirn I atCi '^ A T«-l No. 
Copsu C-e Pn-a Ban): A— as. No. Co-am Keeh rnaaa (M- P. imdinm | J Hake 1900, 
Aomsl We.Ca-aM OtSaisla Ireaa P>elata»d Ha a al Te PU-vl Qua: WOO. b Paid amaVa 
fbweW Cacalaoaa: I. Sake Tnrausb Daaky- Aad Canisri. Soeat Varakaa And Cu iia-a 
Suelwv NaCepma EaakaaOwk, Pnamdimj II MonrM: S7I1 Acmal No. Co-aa 
Of Seejo lasaa Pkblmbad Nana To Puma Osn J03>. I MaA Subarnjalo-s: Avsrao No. 
Copse Baab baaa Oa-ku; naoaiai UHoraaai MOO. Actaal Ne. Copes Of Smata baa 
PaWofcod rioeval To PDkal Du. 1S77.C. Total r\ld Ca-mlax-r Avarar No. Coram Eera 
la-a Cwttjnnaa, llHnh. IIS Am. No. Co-em (XS-ew aeea Pull atmd Naoam 
To KJnw Daaa 1410 D Plea DeaStaalo- By Mai. Omar 0> Olbm kwana l-diasq- Smapma, 
mkay. Aad Orher Pvaa Copms Avanaje Na Caraaa haab laata r>v»> Paa-Msne 1 1 
r M. Actaal No. Capam OfSaa> Uaaa Pualahad Miami To Fums Dam: St. B. Tcaal 
Dasibausl [Sam Of C Aral D): Averse* N°- Caraaa tact. Imva Dunna Pmcadaii ] 1 Monma 
»2U. Actaal No. Cor-a. Of Sna> lama Pablunad Naamna To I'dma Dam H6I P. Copma 
Not DvarvMOad: I . OfTtoa LTa. Len Over. Unsccuunkal. Sptaiad AAer Purawa: Avenuw No. 
Copvn Hack Iwa Durum Pnamdaui 11 Mombt 461, Acres! Na Copma Of Stasia laaaa 
PaUmradNeaieatToniniDak. ilX i. "stum From Noam Amass rvaeTeJI No. Coeam Hack 
[hud [^urmi Prxvodii 12 Marsha 234 . Actual No. Copma Of SmTjIi mmja Publahad Naaraar 
To PBavJ Data: 1 10 (1 T<sal:(S«m of H. H and J-Should Equal Nat Pram Ran Shown In A: 
Av-aja No. Copma Baati mami 0avk>4 Pt-av*m II Momdat "900. Aoaal No, Capes Of 
Stasia mam. PsMvsmd New To Puma, Oat 9100. II. ICarmfy Tarn Tha Smmjamsm Mat, 
By Ma Akurs Am Cmman Aad <~ a^e aa (S.»— Jk MANY 8. KOwERTSON. OfTvm 
a losrom. Cmspss PaoiaaXm. aK. 1 2. Par tl|> I by f 
lib il ilisi mjms 
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DAISY WHEEL PRINTERS 

Qume Spirit 9 -$900 
Qume Sprint 5 - $800 
TECFP1500-$800 

Winchester 10 Megabyte Drive - Seagate 
Model #412 $275. 

3 • Dual 8" drive enclosure with power supply. 
New in box. $125 each. 

5 - Siemens 8" Disk Drives. $100 each. 

Tano Outpost II, 56K. 2 5" DSDD Drives. 
FLEX. MUMPS M95. 

TELETYPE Model 43 PRINTER • with serial 
(RS232) interface and full ASCI I keyboaid. $250 
ready to run. 

SWrPC S/09 with Motorola 128K RAM. 1- 
MPS2. 1-Parallel Poit. MP-09 CU Card - $900 
complete. 

CDS-1- 20 Meg Hard Disk System with controller 
$500. 

(615) 842-4600 MF 9 AM to 5 PM EST 



1 Meg. 2 MHZ SS50 memoiy board. $400.00 
Misc. boards for sale. Call 703-273-6629. Edgar 

Clark. 

••• 

GIMIX #49. 56K CMOS. 2 paripit. 2 ser.brd. 8" 
Qumedrives(2). Old 82A, L/5-ADM36 teim.. 
swAnanuals. Make offer: 616-676-7734, Gary 

Wagna (9-5EDT). 

••• 

SWTPC 69/k 2MHz OS-9 LeVel One system - two 
BOtk 5.25" DSDD floppies. PION 512K battery back- 
up RAM disk, time of day clock, assorted boards, 
teiminal, Microware C and Level One source code 
package, all original disks and manuals. $875 or 
any reasonable offer on separate components. (617) 
493-5162 Peter. 



mm 



Lloyd I/O is a computer a&T^mg carparotkn providing 
soffWtre end hardwae products end cansiJting savfees. 

19535 NEGUSAN POVTUN O, OR 97230 (USA) 

PHONE: (503) 666-1097 'TELEX 910 380 5448 LLOVD I O 

Computer Engineers 
K.BASIC im is here 

K BASIC Is a TSC XBASIC (XPC) compatible COMPILER 

for OS9 A FLEX.. Price $1<& 
Here at lost is o compiler tor BASC tltal will compile oil your 
XBASIC programs- K-BAS1C compiles TSCs XBASIC and XPC pro- 
grams to macJMne code. K-BAS1C Is ready now to save you 
money ond time by teaching your computer to: 

• think Foster • Conserve Memory • Be FriendBer 

Coll (503) 666-1097 fw our CATALOG. 

W» hove many programs lor serious tottwar* O*v»*op»f»l 



DO" 

Micro BASIC for OS9 



$149 



A structured mlrco BASIC tor general system control featuring: 
Parameter passing, 10 stilng variables. 26 numeric vortobles. 
su routines, nested loops. Interactive I/O, sequential Mes. and 
lime variables (tor applications executing In the bockground re- 
quired to execute procedures such os disk or Die backups.) In- 
cludes the SEARCH and RESCUE unimES"'. (Fa OS9 ONLY.) 



SEARCH and RESCUE UTILITIES™ 

for OS9. .. $35 

A super directory seorch utility. Output moy be piped to Ihe In- 
cluded utilities to perform tile: COPIES. DELETES. MOVES, LISTING 
(poginotkxi ). ond FB TER1NG Some tittering utility programs ore 
Included, or Interest Is the PILE DATE CHECM NG utilities: VOUNGE R 
and DRAFT (I evel 2) (For OS9 Level 1 and 2) 



PATCH'" 

Modem Communications tor OS9...S39 

PATCH Is a modem cormxyvfcnrtanx program for OS9 featuring: 
KEV MACROS ASOI TEXT AND BINARY RLE UPfDOWN LOADING, 
PRINTER COPY, ond HELP MENUS We use It severuJ tknes eoch 
day with our TELEX service PATCH Is convenient and easy to use 
Key mocros moy be pre- stored and loaded at ony time. 



CRASMB * 

CROSS ASSEMBLER PACKAGE 

for OS9 & FLEX. ..Oil tor $3<X> 

Motorola CPU's... $150 

Intel CPU's . . . $150. Others .. . $150 



CRASMB Is the highly occlalmed c* 

OS9 and FLEX syst 

velopmenl 




CRASMB featuri 

Symbol cross reference lobA, 

FLEX S 1-S9, INTEL HEX) 



80 

$249) 

symbol names. 
In A formats (OS9. 



USA: 

Inglond 

Owmvony 

Australia: 

Japan: 

S*nti*nond; 

Sweden 



VISA. MC. COO, CHECKS, ACCEPTED 
ILOVO tO IM1M6 1097). St MEDIA [800 334 4400) 

Vlvowoy (0SSJ42142SI. WVvdnnM0*»2 40S149J 

ZaefWM Comiiuliti (45 25 299). KMI SoffVOr* (06203 * ' 41] 
Porti Radio (iuctror,ici(344 9ttt| 
Mlcroboaidl (0474) 224741 SslkOAJ (03) 432-6000 
EUottA9(0S4M27 24) 
Mlciomattsr Scandinavian AO (014 .134595) 



K4ASC oa stADCH ana asCUF mints 

M/CM OMSva am am* KUrovtavrxmoruototo 

0S9 ft a * at Mkronn. REX k a - of ISC 
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Now! m* 



"TOPS 

0FFEOS pmmr ssmip~ r 



Makes professionals of us all. 
For less than just affordable! 



DeskTop Publishing 



NOTE: The following includes a 3 day, hands-on , instructional session for the 
entire "The OFFICE PRINT Shop™' system. A full 6 months, no extra charge, 
telephone or in-house (our offices, normal business hours) follow-up advisory 
service. We feature full Apple™ service and also national service by Honeywell. 
This includes next day , on site service. Over 95% of all service requests are com- 
pleted on the initial call. We understand the importance of fast service! 



100 



( ^ System 100 Very Affordable Save u p to 90% on your printing 



The TOPS System 100 

consists of the following items: 
•A special Apple Macintosh Plus™ 1 Megabyte computer, including 
a double sided, double density 800,000+ character disk drive. 
An Apple LaserWriter™ typeset quality printer. 

Page make-up software 

galley typesetting software 

3 day - on site - instructions 

6 months instructional support & 

much more\ 




We also offer software to drive 
most all the large commercial typesetter. 
You can save a bundle by doing your own 
typesetting and proofing, and then down- 
loading to the commercial system. 



Leasing with payout available for all systems. 



( $Tl ) Also available with 20 million character storage 'Hard Disk' j 



r 



% 



Data-Comp Division 




A Decade of Quality Service' 



V 



r I Vs ^S "^'It*- Systems World-Wide 

Computer Publishing, Inc. 5900 Cassandra Smith Road 
Telephone 615 842-4601 - Telex 510 600-6630 Hixson, Tn 37343 



This document composed, typeset and printed with a TOPS System 100 

1VPS 7TU OFFICE PRINT Stiep u • mkmart of Capa M>ltaokg, he 
AfpU Moo/uu* P Uj \t • ndemsk of Apple CsnyaaBr Ctntfuoy . Inc. 
LanrWriur a • mdasnt of A (Vie Ct»o4»*» Qnfwy, Ids. 
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OS-9 UniFLEX 

MUSTANG-020, 68020, 68881 AND MORE 

HANDS-ON EXPERIENCE 



The DATA-Comp Division of Computer Publishing Corporation announces their new and 
innovative HANDS-ON 68020 computer familiarization two day event. A chance to TRY 
BEFORE YOU BUY! 

For two full days (Monday through Friday - excluding legal holidays) each participant will 
be furnished the exclusive use of a 68020 computer (MUSTANG-020). Each system will 
have available native C compilers, BASIC, assembler and other high level languages. Each 
system will be equipped with the Motorola MC 68881 math co-processor, where 
applicable. 

Each demonstration room will contain not more than two work stations. Each system will 
be equipped with floppy disk, 20 megabyte Winchester technology hard disk, and 2 
megabyte of RAM. RAM is partitioned as 690K bytes of RAM disk and 1.2 megabyte of 
user RAM space. 

Participants are encouraged to bring along any source level projects, for evaluation, in C. 
BASIC or assembler. Call for availibility of other HHLs. 

Although this is not a training seminar. Data-Comp personnel are available for assistance 
and consultation. This event is scheduled for hands-on evaluations of the 68020 CPU. 
68881 math co-processor and MUSTANG-020 system, operating in a functional 
environment. 

Transportation to and from the airport and hotel/motel will be provided. Lunch provided 
both days. Chattanooga airport is serviced by American. Delta. Republic and other airlines. 



COST 

One person - S375.00 
Two persons - $595.00 



• Motel single $22.00. double $26. Of] 
Includes satellite TV • convenient to food and shopping 





DATA-COMP 

A Division of 
Computer Publishing, Inc. 

5900 Cassandra Smith Road 
Hixson.Tn 37343 
Telephone 615 842-4600 
Telex 510 600-6630 



Systems available for both OS-9 and UniFLEX. Reservation should be made 15 days in 
advance. Attendee should initially indicate OS-9. UniFLEX or both. Special facilities 
available on request. Please write or call for additional information. 

NOTE: Both OS-9 and UniFLEX are Unix type operating systems. Each as been enhanced 
in some aspect or another. Prospective attendees should have some working knowledge or 
experience with one of these operating systems, to gain full benefit of the session. 
However, a newcomer will find that it is a simple matter to be fairly proficient in using these 
systems in the allocated time. Special system instruction available on request. Call or 
write. 

* Hotel/Motel cost are separate cost, not included in the basic cost shown. 
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THE 6800-6809 BOOKS 
..hiar ye. HIAR 



OS-9" 
User Notes 



By: Peter Dibble 

The publishers of 68' Micro Journal are proud to make 

available the publication of (Veer Dibbles 

OS? USM sKTTES 

Information for the BtCDJNER Co the FRO, 
tegular or CoCo 0S9 

Oaing 0S9 

HELP, HINTS, PROBLEMS, REVIEWS, SUCCESTIONS, COMPlJMNTS, 

0S9 STANDARDS, Generating a New Bootstrap, Building a 

new System Disk, 0S9 Users Croup, etc. 

Program interfacing to 0S9 
DEVICE 0ESCR1PTOKS, DIRECTORIES, "FORKS - , PROTECTION', 
"SUSPEND STATE", "1MPES", "INPUT/OUTPUT SYS1EM", etc. 

Programming Languages 

Assembly Language Programs and Interfacing; Baslc09, C, 
Pascal, and Cobol reviews, programs, and uses; etc. 



Disks Include 
■o typing all cbe Source Listings In. Source Code and, 
where applicable, assenbled or compiled Operating 
rrogrisi. The Source and the Discussions In the 
Columns can be used "as is", or as a "Starting Point" 
for developing your OUN more powerful Programs. 
Programs sometimes use multiple Languages such as a 
short Assembly Language Routine for reading a 
Directory, which is then "piped" to a Baslc09 Routine 
for output formatting, etc. 



BOOK $9.95 

Typeset •• w/ Source listings 

(3-Hole Punched; 6 x ID 

Deluxe Binder ---------- S5. SO 




FLEX" 
USER NOTES 

By: Ronald Anderson 

The publishers of 68 MICRO JOURNAL are proud to 
make available the publication of Ron Anderson's FLU 
DSEK MOTES, In book form. This popular monthly column 
has reen a regular feature In 66' MICRO JOURNAL SINCE 
1979. It has earned the respect of thousands of 
66 MICRO JOURNAL readers over the years. In fact, 
n's column has been described as ttie 'Bible' for 68XX 
users, by some of the world's leading microprocessor 
professionals. The most needed and popular 68XX book 
available. Over the years Ron's column has been one of 
the nost popular In 68 MICRO JOURNAL. And of course 
68 MICRO JOURNAL Is the nose popular 68XX magazine 
published. 

Listed below are a few of the TEXT fUea Included in the 
book and on diskette- 
All TEXT dies in the book are on the disks 



LOGO CI File load program to offset memory — ASM PIC 

MEMOVE CI Memory move program — ASM PIC 

DUMP CI Printer dump program — uses LOGO — ASM PIC 

SUBTEST Cl Simulation 01 6800 code 10 6809. show differences- — ASM 

TEFtMEM C2 Modem input to disk (or Other port input to disk) — ASM 

M C2 Output a (He lo modem lor another port) — ASM 

PRINT C3 Parallel (enhanced) pnnter driver — ASM 

MODEM C2 TTLoulpul to CRT and modem (or other port ) — ASM 

SCPKG Cl Scientific math routines — PASCAL 

U C-4 Mmi.monilor. disk resident many useful (unctions — ASM 

PRINT C4 Parallel pnnter driver, without PFLAG — ASM 

SET CS Set printer modes — ASM 

SETBAS1 CS Set printer modes — A-8ASIC 

NOTE: .C1..C2, etc. -Chapter 1, Chapter 2, etc. 



••Over 30 TEXT files Included Is ASM (aasembler)-PASCAL- 
PIC (position Independent code) TSC 8AS1C-C, etc. 



AH Source Listings on Disk 



)-8" SS. SP Disk - 
2-5" SS, DD Disks - 



- - SI*. 95 
- $24.95 



Book only: $7.95 + $2.50 S/H 
With disk; 5" $20.90 + $2.50 S/H 

With disk: 8" $22.90 + $2.50 S/H 

Shipping A Handling $3 SO per Book, $2 SO per Disk set 

Foreign Orders Add S4.S0 Surface Mai! 
or $7 00 Air Miil 

If paying by check - Please allow 4-6 weeks delivery 

* All Currency in U.S. Dollars 

Continually Updated In 68 Micro Journal Monthly 

Computer Publishing Inc. 

5900 Cassandra Smith Rd. 

Hixson, TN 37343 



'FLEX Is a trademark of Technical Systems Consultants 

"0S9 is a trademark of Mlcrovare and Motorola 

"6B' Micro Journal la a trademark of Computer Publishing Ine , 



(615) 842-4601 

Telex 5106006630 
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SKnDOS / G8K 

A Progr««m R«port 

fta of thla writing [late October], IKIDOf / UK 
i> running on five different system 
configurations, and we hove users on three 
different continents. « number of people ore 
working on developing new softworc to work 
with iti in the meontime, IK1D0I / IIK'i ability 
to run 1104 program allows us to run 
progroms written for 1104 IKIODI Cor flex] as 
I well. Vou con even shore files - use your 
fovoritc 1104 tcit editor [such as PUT] to 
edit o file, then use o true CIOOO osscmbler 
[such os Computer iystems Consultants ') to 
assemble it. 

ut are Just computing the hard disk 
softwore to go with the new CT-18K and 
Mustang 001 computers. SKIOOf / UK con now 
hondle up to two II megabyte umchesters, 
segment large physicol drives into smoller 
logical drives, have up to ten log,col drives 
on line at any one time Cand more off line!, 
• wop logical drives in and out. and more. (Ind 
■ 101 progroms being emulated olso nove 
access to these some drives and their files. 




f 



Star-K 



Our main aim is to make 

IKtoos / IIK powerful 

yet easy to use. Kit 

this power is there, 

but it docsn 't 

intrude unless 
you use it. 



SOFTWARE SYSTEMS CORPORATION 



t MX 10* UT HtSCO. NV I0M» BU/341 02)7 
rmi J1D»0l«J>« 



SPECIALTY 
ELECTRONICS 

S-O-F-T-W-A-R-E 

for 

* OS9/68000 



ACCOUNTING 

Accounts Receivable $399 

Accounts Payable $399 

General Ledger/Cash Journal $499 

Payroll $499 

Inventory Control $499 

UTILITIES 

Disk Repair $79.95 

Modem 68K $79.95 

Chgatlr $19.95 

Dirs . .. , $1 9.95 



For more information contact 

Specialty Electronics 

909 N. Cleveland / Enid, Oklahoma 73703 

(405)233-1632 

* trademarks OS9 Mtcrowafe. Inc 



6805 
Development Systems 

for 
MS-DOS Computers 

Use the IBM PC/XT/AT or compatible MS-DOS 
computers to develop applications based on Motorola's 
6805 single chip microcomputers. These complete 
intcrgratcd systems consist of a cross assembler program, 
a full screen simulator/debugger program and one 
programming circuit board with menu driven driver 
software. The model MCPM-1 prog board supports the 
MC68705P3, P5, U3, U5, R3 and R5 nmos processors 
while (he model MCPM-2 board supports the 
MC1468705F2 A C2 cmos versions. Ilie programming 
boards connect to the computer via a serial port and allow 
skipping the usual eprom programming step when used 
in a development environment, however, an on-board 
eprom programmer is provided so ihat the boards can be 
used in a stand alone mode. The system components arc 
avail separately. 

Complete Sys. specify MCPM-/2 S495 

Shipping - add 3% for U.S.A. and Canada 

TEC 



^ 



P.O. Box 53 Wea Glover. Vermont 05875 
Phone (802) 525-3458 




Users' 
Group 



Over 90 volumes of public 
domain "C" software including: 

• editors and compilers 

• text formatters 

• communications support 

• UNIX-like tools 

For a catalog tend $10 I U.S.] to: 

The C Users' Group 

PO Box 97 

McPherson. KS 67460 

Write for more information, or call: 

[3161241-1065 
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SOFTWARE FOR 680x AND MSDOS 



DISKETTES & SERVICES 



SUPER SLEUTH DISASSEMBLERS 
EACH $99-FLEX J101-O&9 J100UNIFLEX 
OBJECT-ONLY veratona: EACH JSO-FIEX.OS.'B.COCO 
interecvvar, generate source on rtafc wan Mate, nduit nil. mwy editing 
spent* e800.I.J.3.5.»a*SO2 nun or ZB0WM03 Iranian 
039 union auo proteases FL E X tonrm object 0* into OSS 
COCO COS available in 6800.1 J 3.S.8.9.B!fl? version (rot ZW8O80.51 only 
NEW: 68010 disaliambior $100 FL£X.OS/4.UNIFLEX,OS»»-68K,.MSDOS 

CROSS-ASSEMBLERS WITH MACRO CAPABILITIES 
EACH $50.FLEX,OS/9,UNIFLEX,MSDOS ANY 3 $100 ALL $200 

sceoty lor 1BOic.B50iS80l.68O«.BeO5.68O9.a» J80.B048.M51 808S.88OO0 
modular crossauembat in C. wim kuoMnloao' mimes NOW: OS/Man 

8-brt (not 6BB00) sources lor addwul $50 eecn. (100 lor a. $300 for a« 

DEBUGGING SIMULATORS FOR POPULAR 8-BIT MICROPROCESSORS 
EACH $75 FLEX $100.03/9 $80-UNIFLEX 
08JF.CT-OHLY versions: EACH SSO-COCO FLEX.COCO OSli 
JnlaraAH-tfy urrtisiB procassiys. mdurle Ottaaaemr*, Ihrmaflmg _ briery arnng 
spoc.iy (or 880011. (14)8805. 8302. 8809 OSfS. JS0 FLEX 

ASSEMBLER CODE TRANSLATORS FOR 6S02, 6800/1, 6809 

6302 to 6809 S7S-FLEX $8$-OSV» M0-UN1FLEX 

B800M to 8809 8 8009 id posAlon.Ind S50-FLEX J7S-0S/9 S60-UNIFLEX 

FULL -SCREEN XBASIC PROGRAMS with cursor control 
AVAILABLE FOR FLEX. UNIFLEX, AND MSDOS 

DISPLAY GE NEBATOfMXXaiME NTOH $50 ■ source, $2$ without 

MAILING LIST SYSTEM »100 twaource, £50 wflltoul 

INVENTORY WITH MRP 1 100 wisource. (SO without 

TABULA RASA SPBEAOVfcET $ 1 00 w'SOurce. ISO without 

DISK AND XBASIC uTtUTV PROGRAM UBRARY 
$50-FLEX $30-UNIFLEX(MSDOS 
edrt Oak sectors, son dtrecttry. fnewart masts* catetog, do da* sorts. 
raaoou ana»wm aaa» ol BASIC rxogran. xrof BASC orooram. etc. 
rnrvFLEX vereora rthito sort and «i«»» only 

CMOOEM TELECOMMUNICATIONS PROGRAM 
$100-FLEX,OS/9.UNIFLEX,MS-DOS,OS/9-68K.UNIX 
OBJECT-ONLY varalona: EACH $50 
manu-oVxeo wtrh terminal mode (*» transfer, M006U7. xON XOFF. etc 

IwCOCOsfiOrCTvCOIDOaMisrtrwdCOCOrraamrxMuploaKIOBautf 



525" DISKETTES 
EACH 10-PACK J12.50-SSSD/SSDD/DSOD 
Amortwi maoo. guarerued 100% ouaMy. «r* ijvak ischau. nut rngt. and labels 

ADOmONAL SERVICES FOR THE COMPUTING COMMUNITY 
CUSTOMIZED PROGRAMMING 
we wl custerrtu>e any ol Via pogroms dsscnbotf M this eoVereaarrent or in our 
VraoHrratarajvBziaknaJo^QnwusoQT to cover nawpo^uniracrivDi 
lor auorio^IDn4i2rtrvioapaTilKupootfvrnar1>4tabtrty<ilihor^i^cjConi 

CONTRACT PROGRAMMING 
*e wl creeie now progranv or rooty eiatbng programs on a careroct baa*. 

aurvks we heverxovrje0torovartwVtyy«ttrS,trvJCC*npaersmwrichwB 
nave pBrfcvmart uur t iacl priysHiioij tclife moat rj^putav rmUn or 
rnariramn.lncludyig IBM. SunovrtX Umac Mor»v»e». mora pnputu 
maSb ol mrtcnmnuajrv Induang OEC. EM. 00. HP. AT&T, and most 
popular branda of mttioEunpulan. induling B&OO/t. 6809. 280. 6S02. 
68000. usrig most appropnate languages and operating avatarr*, orr systems 
rsnarej ■ihii a from large '■>■■ mure iinm toairVaooanlcorvtaWi: 
Vie cnarge tor contract pracfanw/vj & usua*r by vio /fou or by tho task 

CONSULTING 
we otlar a MVJe range ol busnees and leOTScal conouSng earvkm, miang 
Mimirara.«Arm^trartnrt arid design, on wry tone reUBedto onmp^r^ 
ffio cNarge tor aanajAvrj « irjrmjrly baaed upon true, travaj, and ecpan&ns 



Computer Systems Consultants, Inc. 

1454 Lstls Lsne, Conyere, GA 30207 

Telephone 404-483-4570 or 1717 

We tske orders si any time, but plan 
long discussions alter 6, II possible. 

Contact us about catalog, dealer, discounts, and services 
Most programs In source: give computer, OS, disk size. 
25% oil multiple purchases ot seme program on one order. 
VISA and MASTER CARD accepted; US lunda only, please. 
Add GA sales lax (il In GA) snd 5% shipping. 

(UNI)FLEX m Tgcfinta Sylvms CoradMBc OSM lAoOava. COCO )arDV;U5DQS ktooun 



SOFTWARE . 
HARDCORE 



tFORTH® 

from TALBOT MICROSYSTEMS 
NEW SYSTEMS FOR 
6301/6801, 6809, and 68000 



•• FORTH PROGRAMMING TOOLS Irom (he 68XX&X " 
" FORTH specialists — gel the best 1 ! " 

NOW AVAILABLE — A variety of rom and disk FORTH systems to 
run on and/or do TARGET COMPILATION tor 

6600. 6301 6601. 6809, 66000. 8080. 280 

Write or call tor information on a special system to lit your require- 
ment 

Standard systems available for these hardware— 

EPSON HX-20 rom system and (argot compiler 

6809 rom systems tor SS-50. EXORCISER, STD. ETC 

COLOR COMPUTER 

6800/6809 FLEX or EXORCISER disk systems 

68000 rom based systems 

68000 CP/M-68K disk systems, MODEL H/12'16 

IFORTH is a refined version of FORTH Interest Group standard 
FORTH, taster than FIG-FORTH FORTH is bofli a compiier and 
an interpreter II executes orders of magnitudes faster than inter- 
pretive BASIC. MORE IMPORTANT. CODE DEVELOPMENT 
AND TESTING is much, much taster lhan complied languages 
such as PASCAL and C. If Sotlware DEVELOPMENT COSTS are 
an imporlanl concern for you, you need FORTH! 

firmFORTH" is tor the programmer who needs to squeeze the 
most into roms. II is a professional programmer's loot tor compact 
rommabte code tor controller applications. 

- IFORTH and TirmFORTH «>« trademarks ol Tatm Microsystems 
* FLEX is a vedwnarkol Tecrw*cal Systems Consultants Inc 
i" CP M 68K is Iradeiiiark ol Digital Research Inc 



— > IFORTH SYSTEMS <~ 

For all FLEX systems: GIMIX. SWTP. SSB. or EXORcisor Specify 
5 or 8 inch diskette, hardware type, and 6800 or 6809 

" IFORTH— extended tig FORTH (1 disk) $100 ($15) 

with fig line editor. 
" (FORTH + — morel (3 5" or 2 B" disks) $250 ($25) 

adds screen editor, assembter. extended dala lypes, utilities, 

?ames. and debugging aids 
RS-80 COLORFORTH — available trom The Micro Works 
" firm FORTH — 6609 only. $350 ($10) 

For (argel compilations to rommabte code 
Automatically deletes unused code. Includes HOST system 
source and target nucleus source. No royalty on targets. Re- 
quires but does not include IFORTH + . 
" FORTH PROGRAMMING AIDS— elaborate decompiled 1 50 

" IFORTH tor HX-20, in 16K roms for expansion unit or replace 
BASIC $170 

" IFORTH 68K for CP M-68K 8" disk system $290 

Makes Model 16 a super software developmeni system. 

" Nautilus Systems Cross Compiler 

— Requires IFORTH + HOST + at least one TARGET: 

— HOST syslem code (6809 or 68000) $200 

— TARGET source code: 6800 $200. 6301 6801— $200 
same plus HX-20 extensions — $300 

6809 $300. 8080 280— $200. 68000— $3 50 

Manuals available separately — price in ( ) 
Add $6 syslem tor shippln , S15 lor foreign air 



TALBOT MICROSYSTEMS 1927 Curtis Ave., Redondo Beach, CA 90278 (213) 376 9941 
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Pl4iS-68k (PL/9 for the 68000) 
running under FLEX™ 



• Built-in screen editor 

• Built-in source-level debugger 

• Byte, Integer and Long variables 

• Single-pass compiler 

• Direct source to object 

• Compiles over 1000 tines/min 

• Runs on any FLEX™ system with a spare PIA port 

The second processor module (included}: 

/ 



Develop 68000 software 

on your FLEX™ system. 

No second computer 

required! 



• 10MHz 68008 CPU 

• 128k bytes RAM 

• Case and power supply 

• Plugs into Windrush UPROM- 

Other software included: 



port 



• Program loader 

• 68000 FLEX™ interface package. 

• Comprehensive System Monitor with source 

• Hex-Binary-Hex Conversion Routines 

Development is currently under way of a version for 
OS/9-68000. The package price includes a free 
copy of the OS/9 version when it becomes available. 



Run FLEX™ 

software on the 

68008 



\ 



J) 



6809 



r 



$999 

Complete 



WKMmmmm mimmmmmmmsmmmmmmmm mmmmmmmm 

For further information, phone or write: 



Worstead Laboratories 
North Walsham 
Norfolk NR28 9SA 
England 

Tel (44) 692 404086 
Telex 975548 WMICRO G 



f(j)yWINDRUSH 



MicroSyslems Ltd. 
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JOURNN. 



OK, PLEASE ENTER MY SUBSCRIPTION 

Bill My: MastercanJ □ VISaCJ 
Canl # Exp. Date 



For 1 Year 



2 Years 



3 Years 



Enclosed: i 



Name 
Street 
City_ 



State 



Zip 



My Computer Is: 



Subscription Rates 
U.S.A.: I Year $24.50, 2 Years $42.50, 3 Years $64,50 
♦Foreign Surface: Add $12.00 per Year to USA Price. 
♦Foreign Airmail: Add $48.00 per Year to USA Price. 
♦Canada & Mexico: Add $9.50 per Year to USA Price. 
•U.S. Currency Cash or Check Drawn on a USA Bank ! 



68 Micro Journal 

5900 Cassandra Smith Rd. 

FOB 849 

Hixson.TN 37343 






Telephone 615 842-4600 
Telex 510 600-6630 



■E£3ri 




CSG IMS is a general purpose information management system 
designed to make the devetopmen t of file- intensive applications as 
quick and easy as possAle IMS is a full featured database 
managei with the added benefit oi a structured, general purpose 
application language Some popular applications are accounting, 
inventory, data acquisition, cataloging, rnembersfvp and mailing 
lists 

SYSTEM FEATURES 

• CSG IMS uses B+Tree index structures tor fast database 
access and reliability Record, index and file sizes are virtually 
unrestricted 

• Supported data types are text. BCD floating point <n digits). 
short and long integers, and date 

• Menu driven executive program for ease of operation. 

• User definable screen lorms and reports are supported 

•' The interactive environment provides access to databases and 
most language features allowing quick ad hoc queries. 

• CSG IMS includes a recursive, compiled language supporting 
program modules with full parameter passing 

• The CSG IMS run-time interpreter is available separately for 
user developed and distributed applications. 

• Comprehensive 320 page manual with tutorial section 

CSG IMS for 0S9/6809 Lll and 0S9/68000 $49500 

Run time interpreter for CSG IMS S100 00 

CSG IMS manual only $20 00 

PMC€S IN US DOLLARS 
AO0 15 00 SIH K» COflTlNENTXL USA. F0REICK 0R0IRS AOO ItOOO SIM 



To order CSG IMS or to receive further information write - 

CLEARBR00K SOFTWARE GROUP 

P Box 8000-499 

Somas. WA 98295-8000 
or phone 

(604)853-9118 

Send for a tree catalog describing all of our 0S9 products. 
We welcome dealer inquiries. 

0S» a » OBBUM IrMvwk it I 
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OS-9 



•DISK— Standard disk driver module allows the use of 
35, 40, or 80 track double sided drives with COCO OS-9, 
plus you can read/write/fonnat the OS-9 formats used by 
other OS-9 systems. Supports OS-9 ver. 2.0. S29.95 

SDISK +BOOTFIX— As above plus boot directly from a 
double sided diskette. $35.95 

SKIO— HI res (51x24) screen driver for COCO OS-9 (ver- 
sion 2.0 supported) $29.95 

L1 UTILITY PACK— Contains all programs formerly In 
Filter Kits 1 & 2, and Hacker's Kit 1 plus several addi- 
tional programs. Complete "wild card" file operations, 
copies, moves, sorts, del, MACGEN shell command 
language compiler, Disassembler, Disk sector edit utili- 
ty, new and Improved editions, approx. 40 programs, In- 
creases your productivity. $49.95 ($51.95) 

PC-XFER UTILITIES— Utilities to read/write and format 
MS-DOS diskettes on CoCo under OS-9. Also transfer 
files between RS disk basic and OS-9. $45.00 (version 
now avallalbe for SSB level II systems, inquire). 

CCRD 512K RAM DISK CARTRIDGE— Requires RS 
Multipak interface; OS-9 Driver and test software now 
Included I Switch selectable address, two may be used 
for 1 Meg. Ramdisk. $199.00 

BOLD prices are CoCo OS-9 for OS-9 format disk, other 
formats (In parenthesis) specify format and OS-9 level. 
All orders prepaid or COD, VISA and MasterCard ac- 
cepted. Add $1.50 S&H on prepaid, COD actual charges 
added. 

sssoc 

1 MEGABYTE RAM BOARD 
Full megabyte of ram with disable options to suit any 
SS-50 6809 system. High reliability, can replace static 
ram for a fraction of the cost. $599 for 2 Mhz or $679 
for 2.25 Mhz board assembled, tested and fully 
populated. 

2 MEGABYTE RAM DISK BOARD 

RD2 2 megabyte dedicated ram disk board for SS-50 
systems. Up to 8 boards may be used in one system. 
$1150.00; OS-9 drivers and test program $30.00. 

(Add $6 shipping and insurance, quantity discounts 
available.) 

D.P. Johnson. 7885 S.W. Cedarcrest St. 

Porlland OR 97223 (503) 244-6152 

(For best service call between 9-11 AM Pacific Time.) 

0&-9 la ■ Iraoamaifc 01 M1crn*aia and Motorola Inc 
MS-DOS It a Iraoawaik 01 Mlcroaoll. INC 



COMPILER EVALUATION SERVICES 

BY: Ron Andsm 

Ibt S.E. MEDIA DIvWoi of Computer 

Publbhing Inc. 

if offering tat following SUBSCRIBER 

SERVICE: 

COMPILER COMPARISON AND EVALUATION REPORT 

Due to Ihe constant and lapid updating and enhancement 
of numerous compilers, and the different utility, appeal, 
speed, level of communication, memory usage, etc., of 
different compilers, the following services are now being 
offered with periodic updates. 

This set vice, with updates, will allow you who are waiy or 
confused by the vaiious claims of compiler vendors, an 
oppoitunity to review comparisons, comments, 
benchmarks, etc., concerning the many diffetent 
compilers on Ihe market, for the 6809 microcomputer. 
Thus the savings could far offset the small cost of this 
service. 

Many have purchased compilers and then discovered that 
the particular compiler purchased either is not the most 
efficient for their purposes of does not contain features 
necessary for their application. Thus the added expense 
of purchasing additional compiler(s) or not being able to 
fully utilize the advantages of high level language 
compilers becomes loo expensive. 

The following COMPILERS are reviewed initially, more 
will be reviewed, compared and beochmarked as they 
become available to the author 

PASCAL 'C CSPL WHIMSICAL PU9 

Initial Subscription - S39.9S 

(includes 1 year updates) 
Updates for 1 year - $14.50 

S.E. MEDIA - C.PJ. 

5900 Cassandra Smith Rd. 

HUson, TN 37343 

(615) 842-4601 




68000 68020 68010 
68008 6809 6800 

Write or phone for catalog. 

AAA Chicago Computer Center 

120 Chestnut Lane — Wheeling IL 60090 
(312) 459-0450 



Tocnnleil Coniuliation arailiMo moil wMkday* from * PM to 6 PM CST 
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A Powerful 

1-2-3 
Combination 



680 Jo 



I 1 . Stylo-Graph Word Processor 

Stylo-Merge Text Formatter aCQ^ 

Stylo-Spell 42,000 Word dictionaiy 6" 1 

2. Motorola 68000 Microprocessors 

3. The 68K OS9 Operating System 

All the Stylo programs are written in 68K assembly code making their performance second to none. 

The ability to always see on the screen what your printout will look like saves time and makes 
your work easier. 



Why settle for less than the best? 
Check it out today! 

Call or write for catalog 



^VISA OH WiS 1 1 WCARD ACCEPTED 



Stylo Software. Inc. 

PO Bo 9% OR? C S»«3l 

O«H0 TAILS 0*0 KUCQ 

1KWI fi?° 3?M 



Hfmd 9>imrn Wortd-Wkl* 



CNtA 10 rtAflt Of OtOCiTH) OUMJTYI 



I A Diiitkm «/ 

* Cfmfuur PuWthiif , lie. 



5900 Cuuodra Smith Rc*l 
Hi»«on. Tn 3734.3 
Telephone 61 S 842-4600 
Telex 510 600-6630 



DATA-COMP 
SPECIAL 
Heavy Duty Power Supplies 

For A limited time we are offering our HEAVY DUTY SWITCHING 
POWER SUPPLY. These are BRAND NEW units and will not last 
long. Also not* that these prices are less than 1/4 the normal price 
for these high quality unit. 




Mike BwJiol 



Sue 10 i I 3 l IS i 



fcne m IXK&OvoBi jc (nap chap) Our in. 

• 12* - 4.0 mafm 
-I2t-0J ux» 



M«to«( 



Tomnil affjp 



EkJi 

SPECIAL: $59.95 
2 or more 49.95 



Add $7.50 eadi S/H 



Makr 



So«:l07S»«tlISi 

Rani: 1 IO/23Q k (mp ckaafO Out SI vau 

Ouqtat .S» tXlKE* 
tllr .34 mpi 
.12» -24 •opt 

-12> - 04 m» 



Mitml 



Metal 

AiCansif tfcort era* nvw? 



SPECIAL: $49.95 
2 OR MORE 39.95 

Add: S7 30 S/l latch 



68' Micro Journal 



December '86 



61 



6809<>68XXX 
UniFLEX 

X-TALK 

A C-MODEM/Hardware Hookup 

Exclusive for the MUSFANG-Q20 miming 
UniFLEX, is a new transfer program and cable set 
from DATA-COMP (CPI). X-TALK consist of 2 
disks and a special cable, this hook-up enables a 6809 
SWTPC UniFLEX computer to port UniFLEX files 
directly to a 68XXX UniFLEX system. 

This is the only currently available method to 
transfer files, text or otherwise, from a 6809 
UniFLEX system to a 68000 UniFLEX system, that 
we have seen. A must if you want to tecompile or 
cross assemble your old (and valuable) source files to 
run on a 68000 UniFLEX system. GIMIX users can 
directly transfer files between a 6809 GIMIX system 
and our MUSFANG 020 68020 system, or GIMIX 
68020 system. All SWTPC users must use some soit 
of method other than direct disk transfer. The 6809 
SWTPC UniFLEX disk format is not readaMe by most 
other 68000 type systems. 

The cable is specially prepared with internal 
connections to math the non-standard SWTPC SO/9 
DB25 connectois. A special SWPTC+ cable and 
software is also available, at the same price. Orders 
must specify which type SWTPC 6809 UniFLEX 
system they intend to transfer from or to. 

The X-TALK software is furnished on two 
disks. One 8" disk containing the 6809 software and 
one 5" disk containing the 68XXX software. These 
programs are also complete MODEM programs and 
can be used as such, including X-on X-off, and all the 
other features you would expect from a full modem 
program. 

X-TALK can be purchased with/without the 
special cables, however, this SPECIAL price is 
available only to registered MUSTANG-020 owners. 

X-TALK, w/cable $ 99.95 
X-TALK only 69.95 

X-TALK w/source $149.95 

DATA-COMP 

5900 Cassandra Smith Rd. 

Hixson. TN 37343 

Telephone 61 5 842-4601 
Telex 510 600-6630 

Note: Registered MUSTANO-020 owner* mujl furnish system 
serial number In order lo buy el these special km prices. 



68' Micro Journal Disks 

Disk- 1 Pvieaon. Minia. Mirbcopy.MirtiJ'rrij. "Lifetime. 

••Poetry. "Foodna, "Diet. 
Disk- 2 Oiikedil w/ mst.4 fixes. Prime, •Prtnod, ••Snoopy, 

♦•Football "(fcxiMwii.**Lifetune. 
Disk- 3 Omg09.Secl.Sec2.Rnd.TabW. traexu Disi-atp, 

•Oukiave. 
Disk- 4 Mailing Program, •findda. "Change. Tcsufist 
Disk- 5 'DISKHX l.'DISKrTX 2. ••LETTER, 

••LOVESICN. "BLACKJAK. "BOWLING. 
Disk. 6 "Purchase Onkx. Index (Disk file indx). 
Disk- 7 Unking Leeds, Rload, Nntxa. 
Disk. 8 Crteat, Lanpher (May 82). 
Disk- 9 Datecopy, Diik£x9 (Aug 82). 
Disk-10 Home Accounting (July 82). 
Disfc-H Diuan bier (June 84). 
Disk-12 MorfenW (May 84). 
Disk-13 •Irnimfog, TesunffiS. 'Cleanup, •Dskalign, Help. 

DbicTxl 
Disk-14 •Ml. Ten. *Termuul, 'find, •Diskedii, Inii.Lib. 
Disk-lS Modem9 + Updates (Dec. 84 Gilchrist) to Modcm9 

(April 84 Com mo). 
Disk-It Copy.Tu, Copy.Doc, Cat.Txi, CaLDoc 
DUfc-t7 Match Utility. RATBAS, A Basic Preprucusor. 
Disk- 18 Pant Mod. Size.Cmd (Sept 85 Armmong). 

CMDCOOB. CMD.Txt (Sept. 85 Spay). 
Disk-19 Clock. Oair, Copy. C*.POELAs«i * Doc, 

Emn.Sys. Do, Log.Ann & Doc. 
Disk-20 UNDC Like Tools (July ft Sept 85 lay lor A 

Gilchrist). Dragon-C, Grcp.C, LS.C. FDUMP.C. 
Disk-21 UuBJie. A Game* - D*e, Life. Madneat. Touch, 

Goban, Stantax, A 15 more. 
Dfsfc-22 Read CPM A Non-FLEX Disks Fnssr May 1984. 
Disfc-23 ISAM. Indexed Scqucnta! file Accessing Methods, 

Condon Nov. 1985. Extensible TaMe Driven. 

Language Recngrarion Utility, Andcroon MardiI986 
Disk -24 68' Micro Journal Index of Articles A Bit Bucket 

Herns bom 1979 - 1985, John Current. 
Disk-25 KERMJT for FLEX derived from the UNDC ver. Burg 

Feb. 1986. (2)-S~ Disks or (1)8" Disk. 
Disk-26 Compacu Urti Board review, code & diagram . Builison 

March '86. 
Disk-27 ROTABrr.TXT. SUMSTEST.TXT. 

CONDATA.TXT. BADMEN.TXT. 
Disk-28 CT-82 Cmuutce. bit mapped. 
Disk-29 "Star Trek 
Disk-30 Simple Winchester. Dec '86 Green. 

NOTE: 
This is a reader service ONLY I No Warranty is offered or implied, 
they arc as received by 68' Micro Journal, and are for reader 
convenience ONLY (some MAY include fixes or patches). Also 
6800 and 6809 programs are mixed, as each is faiily simple 
(mostly) lo convert u> the adto. 



8" Disk $14.95 



5" Disk $12.95 



68' Micro Journal 

5900 Cassandra Smith Rd Hixson, TN 37343 

X (615)-842-4600 



Telex 5106006630 

* Indicates 6800 

♦•Indicates BASIC SWTPC or TSC 

6809 no Indicator 

Foreign Ordeis Add 54.50 for Suiface Mail 

or $7.00 for Air Mail 

•All Currency in U.S. Dollars 
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6809/68008 SINGLE BOARD COMPUTERS 

The Peripheral Technology Family of Single Board Computers is a Low-Cost Group Which 

Ranges From an Entry Level 8-Bit Version to a Powerful 68008-Based Board. A Product is 

Available to Fit Almost Every User's Requirements. 



PTM-S 

• 6609 Processor/2MHZ 
Clock 

• 4 RS-232 Serial Ports 

• 2 8-Bil Parallel Ports 

• 4K-16K EPROM/60K Ram 

• Parallel Printer Interlace 

• DS/DD Controller for 35-80 

• Track Drives Ranging From 
SS/SD-DS/OD 

• Winchester Interlace Port 

PRICE $349 00 



9HB- 



PTM-J 

• 6809 1 MHZ Processor 

• 2 RS-232 Serial Potts 

• 2 8-Bil Parallel Ports 

• 4K EPROM/59K User Ram 

• DS/DD Controller for 35-80 
Track Drives Ranging From 
SS/SO-OS/DD 

PRICE: $269 95 
OS9L1 For 
PT69 BOARDS $200 00 
SK-DOS $ 49 95 



PERIPHERAL TECHNOLOGY 

1480 Terrell Mill Road. Suite 870 

Marietta, Georgia 30067 

(404) 984-0742 Telex # 880584 

VISA/MASTERCARD/CHECK/C.O.D. 



PTMK-1 

• MC68O08 10 MHZ 
Processor 

• 768K RAM/64K EPROM 

• 2 RS-232 Serial Ports 

• Winchester interlace Port 

• Floppy Disk Controller for 
2 5+" Drives 

• 2 8-Bit Parallel Ports 

BOARD: $595.00 

WITH OS9: $749.95 

WITH SK'DOS: $675.00 



, v . _ 



™OS9 Is A Trademark Of Microware and Motorola 



Send For Catalogue For Complete Information On All Products. 




XDMS-IV 

Data Management System 

XOMBIU PROCESSING MODEL 
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Qpptr/Lovtr [ill coaminoi 1 Ul«r fiaflfttd ■<■«•*■ *nd print control' 
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flEKU) T*C*lr*l Vrttrwa Con*«ltwila. |ll»i'Ui tlAfHUlS CotP. 
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BOARDS & PARTS FOR GIMIX SYSTEMS 

CONTACT GIMIX FOR PRICES, DETAILS, AND REOUIRMENTS FOR HARD DISK AND OTHER MASS STORAGE UPGRADES. 



1HE GIMIX CUSW CHASSIS lit consists at I fttavywelflril atumtaum 
cabinet, constant ««Uge lend lesorunl power supply, jnd SS50 Mother 

Card villi tuutJ nle geneialoi boaid St49l.il 

«;? I ripte OiSk ReguUlOf Clld $81.22 

191 (Uud Rile Cuntiilw Bund Sit t) 

123 Musing Crete Detaclor $36 2) 

19? fillei PUIe SUJ1 SOH.Opllor) $30 00 

Cable sets 8" wllh Back Panel connector . S?9j ?S 

lorlwoB (Klernaldirvts S44 ZS lor lwoi"dirves $34.96 

CPU BOARDS 

801 GMX III CPU & OS 9 GMX III . S 1691.01 

•01 GM X III CPU & Untri EX III S 1996.02 

Hi 10) GIMIX 6109 PLUS CPU »«»»< $576 05 

Optlani ClMIXOAl SIS 00 9S11A $312 00 

SWlPOal SIS 00 9512 $265.00 

I0368OOCPU S224.03 

•OS 5rWO CPU w/Tiniers 1261 OS 

6600 Baud Rile Oplmn ...... Add S30 .00 

FLOPPY DISK CONTROLLER 

I6I0MA .. SSIS.6I 

MEMORY BOARDS FOR 6809/68020 SYSTEMS 

172 2»KB CMOS SIA1IC RAM board 
wilh bxllcry bach up Ispecily syslain) $646.72 

MEM0RY"B0ARDS (6B00/E809 SYSTEMS ONLY) 

134 8K PROM Card 598 34 

132 16 Socket PROM/HOM/RAMBoaid. 24 P»n $238 32 

•31 l6SocketUnlveisatMemoryBoird.24/2Bpln $266 31 

INTELLIGENT I/O PROCESSOR BOARDS 

sKjniliunlly leduce srsiems oveihud by handling routine I/O tunc- 
lions. Iirelng Hie boil CPU kx tunning user piogiams This Improves 
overall system peilor rrunee ind allows user terminals lo be lun al up lo 
19 ?K baud Fo> use with GMX Ml and 020 systems. 

Ill 3PoMSeital 35 P»n |OS9> S496.11 

1 1 43 Pc»l Seitit 30 Pin |UnlFLEX I $496.14 

• IJPaialicI SO Ptn (UntFlf X 020) SS36 12 

613 4PortSeil*l S0Pln(0S9&UnlFLEX-020| $616.13 

1 1 5 24 K Veislon ol 1 1 1 . wllh ellbti Uige Input Of 

oulpui toilers (specify) $646.19 

I/O BOARDS (6800/6809 SYSTEMS ONLY) 

141 Semi. IPotl SI8.41 

• 43Seii*l 2Po»l $12643 

146 Sena*. 6 Potl IOS9/FLEX on/y) $316.46 

142 Parallel. 2 Port $86 42 

144 Pau«*t. 2 Pwl (Centronics ptnoul) $126 44 

145 Parallel. I Perl (OS9/FlEXonty| $196 49 

ISO I/O ioi RS 232C. 423. 422w/6B50 $244 50 

152 SSOA wllh 6BS2 $254 52 

154 AOLC wllh 6654 $2(6.54 



CABLES FOR I/O BOAtlDS - SPECIFY BOARD 

I9S Cable sols (I needed poi potl) $24.95 

151 Cent S P Cable In 612 6 644 $34 51 

653 Cent. Cable Set $36.53 

OTHER BOARDS & PARTS 

166 Prototyping Boiid-SO Pin $56 66 

133 Prototyping Boaid-30 Pin • $36 33 

Wlndiusb EPROM Piogiafluiet S30 (OS9/FLEX 6 609 only) ... $545 .00 

176 Video Board BO « 24 $396.76 

608 Relay Oliver Package $1126.06 

IIS Above wllhoul Relays $536 66 

Oplo Board $346.85 

Blndet. 3- J 12.00 

Blndei. 2" $9.00 

S" DRIVE CABINET & PARTS 

2 6" 0S00 Drives. Cabinet 6 Cables fjOHz only $1691 68 

Cabinet Only tor 6" Ortve $146 16 

220v/50Hl OpHonAdd $30 00 

Cable Set- Internal lor 2 Drives , $44. 62 

Cable Sel -Internal Iw 4 Drives $67.84 

Cable Irqm B" Cab. to Mjlnliame $45 81 

8" filter Plata $14 .83 

SOFTWARE: 

GIMIX e.cluslve versions Ot OS-9/GMX I. II. Ill 4 FLEX are tor GIMIX 
hardware only AH versions p| OS-9 requlie Ihe 168 controllel. When 

ordered wllh control lei. FLEX Is $30.00 

GIMIX versions ol FlEX , $90.00 

GMXVOtsklorFlEX09. $100 00 

CMXBUQ: rROMii. Manual $148 65 

Bool or Video/Bool PROMS (6809) $30.00 

GIMIX Boot PROM lor UNIFLEX $50 .00 

RMS (0S9) $250.00 

DO (0S9) $70 .00 

OS-9 GMX III Update w/CPU SPPTROM $125 00 

I/O PROMS w/Update $40.00 

GMxBUG/FLEX/VOISX w/OS-9 III update Add $ 175 00 

RAM Dish lor OS-9 $125.00 

O-FLEX $250 00 

0S9 GMX I . . . : $250.00 

0S9GMXII $500.00 

SCULPTOR 6609 (UnlFLEX /OS-9] $995 .00 

SCULP70R-6B020 (UnlFLEX) $1595.00 

CONTACT GIMIX FOR PRICES ANO AVAIUBIllTt OF OPTIONAL 
UNIFLEX AND 0S9 IANGUAGES ANO OTHER SOFTWARE. 

ALL PRICES ARE FOB. CHICAGO. 

GIMIX DOES NOT GUARANTEE PERFORMANCE OF ANY GIMIX 
SYSTEMS. BOARDS OR SOFTWARE WHEN USEO WITH OTHER 
MANUFACTURERS PRODUCT. 



Li/iiTEo mum 

G«X INC. CGKX'I warrants Its products against 
defects In oaterial and eorkiianshlp For a period of 
ninety days free the date of shipment. The obligation of 
GHX Is I [cited to the repair or replacennt of any pro- 
duct. Free of all charges, which proves defective during 
this period. This trarranty does not cover daaage due to 
accidents. negligence, abuse or tampering. 

GRX PIKES HO OTHER kJARRANTIES OR GUARABTTC ES . EX- 
PRESS, STATUTOBT. OR I7IPLIED. Of ANT KU0 HHATSOEKR 
KITH RESPECT TO AKY PRODUCT PURCHASED. ANO ANT IISPLIEO 
KARRAKIT OF flERCHAriTABIUTT OR FITNESS FOR A PA8- 
1ICULAR PURPOSE IS HERE6T DISCLAIMED BT GHX ANO EX- 
CLUDED FfiOA ANT AGREEjEH MADE BT CM. 

GNX trill not be responsible for any daaage of any kind 

not covered by the exclusive reaedles set forth In this 
Halted trarranty. CM vlll not be responsible For any 
special, Indirect, or consequential daaage caused by Its 
products. 

MX products are not For constaer use. GSX express- 
ly dlsclaiis all earrantles on any of Its products 
Which aay be Included In any product norutly used for 
personal or failly purposes. 

Contact CTIX by aall at 1337 Yest 37th Place, Chicago. It 
60609; or phone at 1312) 927-5510: If your product Is 
defective to arrange for its repair or replacement 
uncer this trarranty. 



Repair charge* tor GIMIX products tiler warranty parrot] win be 
S35O0 pel hour per board (minimum $35.00) plus parts. 
Customer pars freight charges both ways. It GIMIX determines 
that replacement Is desirable Instead, we will nobly you. 
Charges tor Checking out complete system w/71 be SSOO 00 plus 
parts, trelghi and necessary board repairs. 



GIMIX. Inc. mervn Ihe rtghl lo change pricing, terms, and products 
speclltullons al any time without further notice. 



s 
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Gimix 



inc 1337 WEST 37th PLACE • CHICAGO, ILLINOIS 60609 
(312)927-5510 • TWX 910-221-4055 
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Now Offenng *FLEX" (2 Versions) 
AND 'STAR-DOS PLUS+ '" 




For Otttmrtng Call 

(615)842-4600 



FROM - DATA-COMP, C.P.I. 



A Family of 100% 68XX Support Facilities 

The Folks who FIRST Put FLEX" on 

The CoCo 
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STAR DOS PLUS + 

• Functions Same as FLEX 

• Reads • writes FLEX Disk* 

• Run FLEX Programs 

• Just type: Run 'STAR DOS" 

• Over 300 utilities & programs 
to choose from 



f 


TSC Editor 




NOW $35.00 


L 


y) 



PLUS 

ALL VERSIONS OF FLEX & STAR-DOS 

+ Read-Write-Dir RS Disk 
+ Run RS Basic from Both 
+ More Free UtJities 




INCLUDE 

+ External Terminal Program 
+ Test Disk Program 
+ Disk Examine & Repair Program 
+ Memoty Examine Program 
+ Many Many More!!! 



TSC Assembler 




(bgtMOO 


L 


NOW $35 OO 

1 



CoCo Disk Drive Sgsleuis 



2 TH1NLINE DOUBLE SIDiO DOUBLE DENSITY DISK DRIVES 
SYSTEM WITN FDUEE SUCI-L* .CAIINtT, 01SI OllVE CARLE. JiH 
NEW DISK CONTROLLER JP0-CP VJTH J-OOS.RS-DOS OPERATINC 
SYSTEMS. |4*«.») 

• Spiel (y What CONTROLLER You Want JAN, or RADIO SHBCX 

TMINLINE DOUBLE S1DE0 
DOUBLE DENSITY *0 TRACKS 



MK VPCSAOi 

FOR C.0,E, P, AND COCO II 
RADIO SHACK BASIC I. 2 
EAD10 SHACK DISK BASIC 1.1 



Verhjhm Diskettes 



Sinftlf Sldad Doubl« DtDtity 
Deubl* Sided Double Deoelty 



Cooli oilers 



JtN JPO-CP WITH J-0OS 
WITH J-OOS, KS-OOS 
RADIO SHACK ] . I 

RADIO SHACK Diik CONTROLLER 1.1 



Disk Di ive Ciu!>-'> 



Ceble for One Drive 
Cable for Two Drive* 





DISK OltVE CABINET POl A 


III*. as 


SINGLE (WIVE 




DISK DRIVE CAEINET POl TWO 




TK1NLINE DRIVES 


} 14.00 


nirruj 


} 14.00 


EPSON U-BO 




EPSON HX-70 




EPSON KX-100 


•139. 95 


ACOMoaiE* rot ifboc 


$119. *» 




tiM.aj 


61*6 2E SEEIAL BOARD 


81*9 32K EXPAND TO I2BK 




EPSON MJ-M-UO KIIMNS 


413*. aj 


EPSON LX-80 ElEtONS 




TEACTOE UNITS PO« LX-BO 




CABLES 4 •THE* IHTCK/ACKS 




CALL POR PRICING 


i la.tj 




i 24. as 





I 29.95 



t 24. as 
i 24. as 



* 4».»5 

t ta.as 



B2M.9J 

•us.aj 
$»*i.*i 



JI49.95 

» s.as 



DATA-COMP 

5900 Cassandra Smith Rd 
Hixson. TN 37343 
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SHIPPING tS* 

f^:^ d ^" s .| (615)842-4600 

n(H. $2.50 'Of OtoWring 

Telex 5106006630 
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S - 50 bus / 68XX 



Board and/or Computer 

Term inals-CRTs-Printers 

Disk Drives-etc 

REPAIRS 



NOW AVAILABLE TO ALL SS0/&8XX USERS 
The Data- Gamp Division of CPI Is proud to announce the availability ol their 
service department labilities to 'ALL' S50 Bus and 63 XX users. Including all 
brands, SWTPC - GIMIX - SSB - HELIX and others, including the single board 
computers. 'Please note thai kit-built components are a special case, and will 
be handed on an Individual basis, if accepted. 

1. If you require service, the first thing you need to do Is call the number 
below and describe your problem and confirm a Data-Comp service & shipping 
numbed This Is very Important, Data-Comp will not accept or repair Items not 
displaying this number I Also we cannot advise or help you troubleshoot on the 
telephone, we can give you a shipping number, but NO advice! Sony I 

2 All service shipments must include both a minimum $40.00 
estimate/repair charge and pre-paid return shipping charges (should be same 
amount you pay to ship to Data-Comp). 

3. If you desire a telephone estimate alter your repair item is received, 
include an additional $5.00 to cover long distance charges. Otherwise an 
estimate will be mailed to you. il you requested an est male Estimates musf 
be requested Mailed estimates slow down the process considerably. 
However, If repairs are not desired, after the estimate is given, the $40.00 shall 
constitute the estimate charge, and the i'.omjs) will be returned unrepaired 
providing sufficient return shipping charges were included with the item to be 
serviced Please nolo that estimates are given In dollar amounts only. 

4 Data-Comp service is the oldest and mast experienced general 
S50/68XX service department in the world. We have over $100,000.00 in parts 
in stock We have the most complete set of service documents lor the various 
S5Q/68XX systems of anyone - YET, WE DO NOT HAVE 
EVERYTHING! But we sure have more than anyone else. We repair about 
90% of all items we receive. Call for additional information or shipping 
instructions. 





DATA-COMP 

5900 Cassandra Smith Rd. 
Hixson.TN 37343 



(615)842-4607 
Telex 5106006630 



